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CP7 earnmg Sysrem 全 3 巻 の 材 成 


この 「CP ン M Learning System」 全 3 巻 は , 次 の よう に 構成 され て いま す . 
人 門 で P ン / MG CP/M が どの 様 な も の で ある か を 解説 し , CPM を 使う た め の 基 礎 
知識 。 日 常 よ く 使 う 各 コマ ンド の 実習 な ど を や さ し く 具体 的 に 解説 し 
- 交 
今 ま で CP/M に つい て は 全く 知ら な か っ た 読者 で も , 本 書 に より CP/ 
M の 概要 を 理解 し , 一 通り CPM が 使え る よう に な れる よう 配慮 る 
れ て ゆい ます, 
実習 CPM……… CP ノ M の 全 コ マン ド と , その ほとん どす べ て の 使い 方 を 徹底 的 か つや 
さ し く , 具体 的 に 実習 し な が ら 解 説 し ます . また , CPM の ハー ドウ ワ 
ェ ア お よび ソフ トウ ェ ア の 構成 に つい て も 解説 し , CPM の 実用 例 と 
し て , CP ン M ア セン ブラ に よる マシ ン 語 開発 の 全 過程 を 実習 し ます . 
本 書 は , 読者 が 本 格 的 に CPM を 使う よう に な っ た 場合 , CP ン M の 
コマ ンド ・ ハ ンド ブッ ク と し て , 随時 参照 する こと に な る で し ょ う 2. 
応用 CPM……… CP/M を さら に 深く 広く 応用 する 場合 に つい て の 解説 書 で す . マ クロ ・ 
アセ ン ブ ラ に よる マシ ン 語 開発 , シス テム ・ コ ー ル , 各種 高級 言語 の 
使用 例 , アプ リケーション や ユー ティ リティ の 実行 な ども , 分 か り 色 
い 実 行 例 に 基づい て 解説 し ます . さら に CP ン M の 内 部 構造 , BIOS の 
詳細 な ど , 本 格 的 な CPM ユー ザー と し て , いずれ は 必要 と な る 知 
識 を 提供 し ます . 
各巻 は それ ぞ れ に まとまっ て いま す の で , 必要 に 応じ て どの 巻 を 手 に され て も 利用 する こと が で き 
し 科 
本 シリ ー ズ は ,CP ン M version 2 . 2 を 基 に し て 書か れ て いま す が , 旧 バ パー ジョ ン で ある , Version 
1 4 を 使う 場合 の こと を 考慮 し , 共通 で な い コ マン ド に つい て は , その つど 注意 書き を 付け 加え て あ 
天 ま 。 


論考 まそ が の き 


1982 年 7 月 。 NEC は ,、 つ い に 自 社 の パー ソナ ル ・ コ ンピュータ , PC-8001 と PC-8801 に 対す る CP ノ 
IM を , NEC 自ら が 開発 し , 4 万 円 を 切る 低 価格 で 発売 し まし た . 価格 は 惑 らく 国内 で は 今 ま で の 最 
低 の も の だ と 思わ れ ま す が , その 人 性 能 は 。 CPM 史上 の 1 つの 事件 ? と し て , 特記 に 価 する 素 晴 し 
いも の で す . 

アイ スク ・ ア クセ ス の 高 北 , CRT 表示 の 高速 化 ・ エ ステ ー プ ・ シ ー テ ンス に よる スク リー ン ・ コ 
ント ロー ル , 割り 込み を 使っ た キー 入力 , N-BASIC の ROM 内 ルー チン の 呼び 出し 機能 等 々 . この 
CFM は , 今後 , 他 機種 用 の CPM を 開発 する メー カー に と っ て , 高い 所 に 置か れ た 1 つみ 目標 
と な る で し ょ う . パー ソナ ル ・ コ ンピュータ 用 の CP ン M で , この CP ン M を 超え る も の を 作る の は 
窒 支 な こと で は な いと 思わ れ ま す (この NEC の CP ン M に つい て の 解説 は 慈 末 付 録 A を 参照 し て 下 
さい /. また , 東芝 も 同様 に PASOPIA 用 の CP ン M を , 本 書 の 原稿 が 書き 上 っ た 9 月 に 発売 し まし た . 


大 手 メー カー が , 自社 の 機種 用 の CP ン M を 自ら 開発 し , 発売 する に 至っ た 背景 に に は , 現状 の BASIC 
コン ピュ ー タ の ソフ トウ ェ ア 的 な 行き づま り が あり ます . 

この こと は , パー ソナ ル ・ コ ンピュータ が 発売 され て 以来 、。 付属 の BASIC 言語 に よる その 応用 を 
考え て きた 多く の ユー ザー ー が 痛感 し て いる 問題 で あり , メー カー に と っ て も , 今後 の 市 場 を 確保 し . 
パー ナル ・ コ ンピュータ 分 野 の 一 居 の 発展 を 望む に は , ソフ トウ ェ ア の 充実 が 急務 な の で す . その 
だ め に は 8 ビッ ト ・ コ ンピュータ の 標準 OS と な っ て いる CP ン M を 載せ な けれ ば な ら な いと 判断 し 
た た めで し ょ う . | 

今日 "CPM」 は , デジ タル リサ ー チ 社 と いう 一 私 企業 の 製品 と いう より . 事実 上 の 世界 的 標準 OS 
と いう 意味 あい が 強く , 特に 8 ビッ ト 機 で 80 系 を 採用 し て いる も の な ら ば , CP ン M が 利用 で き な い パパ 

ー ソ ナル ・ コ ンピュータ な ど は 。 メー カー 0 0302 
機 。 専用 機 な ど は 除く ). 

まず CPM を 」 こ れ は 筆者 が , 日 本 で 最初 の CP ン M 解説 書 で ある "標準 CPM ハン ドブ ッ 
ク ” 以来 主張 し て いま す が , これ は 全く ユー ザー の 側 に 立っ た 発言 で あり , CP ン M を 採用 する こと が 
最も 継 済 的 で , 最も 多大 な 利益 を ち た ら す こと を 否定 で きる 人 は いな いで し ょ う . とにかく まず ,CP ン 
M に 集中 し て いる 豊富 な 共通 資源 を 利用 で きる 体制 を と る こと で す . すべ て は それ か ら の 話 で す . も 
し 他 の OS に に 関心 が あれ ば , UNIX Hike の OS な り , 何 な り を 試み る こと も よい で し ょ う . 

' まず CPM を 」 こ れ が ユー ザー の 利益 に と っ て 最も 安全 確実 な 道 で ある と 思い ます . 


著者 まえ が き 


本 書 「 応 用 CP ン M」 も , 完成 が 大 幅 に 遅れ , 当 シ リー ズ の 多く の 愛読 者 に し びれ を きら させ て し ま 
い 。 どう も 申し 訳 あ り ま せん で し た . それ ほど 怠け て いた 訳 で は な い の で す が , いざ 手 を 付け て みる 
と あま り に も 多く の 事柄 が あり 過ぎ , 時 間 が か か っ て し まい まし た . し か し 本 書 の 内 窒 を 見 て いた だ だ 
けれ ば 多少 は 放し で も らく る の か と も 思い ます . 本 書 「 応 用 CPZM」 に より , 初め て 世の中 
に , CP ン M の 本 当 の 力 を 紹介 で きる 本 が 出現 し た と 思っ て いま す . 


本 書 の 「 シ ステ ム ・ コ ー ル 」 の 章 に より , 多く の 読者 が , CPM 最大 の メリ ッ ト で ある この シス テア 
ム ・ コ ー ル を 自在 に 使い こなせ る よう に な る で し ょ う . それ に より , CPM 上 の 多く の アプ ブリ ケー シ 
ョ ン ・ ソ フト が 生ま れ て きま す . ' 

また 「 高 級 言語 」 の 章 に 刺激 を 受け , 自分 の 目的 に 合 う 言語 に 取り 組む 読者 も 大 勢い る で し ょ う . そ 
こ か ら は , アセ ンプ ブラ で 書く の が 困難 な 大 き な シ ステ ム ・ ソ フト ウェ ア も 生ま れ て きま す . 

こう し て 。, 共通 OS の も と で , 優れ た ソフ トウ ェ ア が 生み 出さ れ , それ が 広く 流通 し , 日 本 の マイ 
クロ コン ピュ ー タ の ソフ トウ ェ ア 水 準 の 向上 に , 当 CPM シリ ー ズ が 少し で も 役立つ な ら , 著者 と 
し て これ 以上 の 喜び は あり ませ ん . そう な る こと を 心から 期待 し て いま す . 


1982 年 9 月 村瀬 康治 
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7 英 C の 状 半 閣 と 計 半 の 放線 


CP/M の 内 部 構造 と 機能 の 詳細 


本 草 で は , CPM の 内 部 構造 を , CPM 上 で 実行 する 各種 ソフ トウ ェ ア を 開発 する ユー ザー や , CP ノ 
M の BIOS を 変更 し て , 独自 の CPM に 改造 し よう と する ユー ザー を 対象 に , 只 体 的 か つ 詳 細 に , 実践 
に 役立つ よう に 解説 し ます . 本 章 は , 次 章 の 「 全 シス テム ・ コ ー ル 徹底 解説 」 と は 密接 な 関係 に あり 
ます の で , それ ぞ れ 関係 する 項目 を 相互 に 参照 し て 読み 進ん で 下さ い . 「 


CPM の 構成 は , 入門 お よび 実習 CPM で も 解説 きれ て いる よう に , 


TPA (Transient Program Area) 

を た だ (Console Command Processor) 

BDOS (Basic Disk Operating System) 
( 


BIOS Basic Input Output System) 


と , アド レス 0000H 一 00FFH の スク ラッ チ ・ パ ッ ド ・ エ リア か ら 成 り 立 っ て いま す . その メモ リ 上 の 配 
置 を 図示 し て お きま す .「 実 習 CPM」 の 1 章 ・2 章 も 随時 参照 し て 下さ い . 


プー | @ ウ ォ ー ム ・ ス ター ト の エン トリ ・ ポ イン ト . 
メイ ン ・ メ モリ を 


@|0 バ イト . 

@BDOS へ の エン トリ ・ ポ イン ト 

@ フ ァイル ・ コ ント ロー ル ・ プ ロッ ク ・ エ リア . 

@ イ ンプ ブ プット, アウ ト プ ッ ト の DMA バ ッ フ ァ . な ど , CP 
〆M シ ステ ム の スク ラッ チ ・ エ リア と し て 使わ れる . 
ユー ザー・ プ ログ ラム ・ エ リア . 

ファ イル 名 の エク ステ ンション が “COM" で ある プロ グ 
ラム は , アド レス I00H か ら こ の エリ ア に ロー ド さ れ 実 行 
され る . 


ン し た コマ ンド を 解釈 実行 する プロ セッ サ . 

ビル トイ ン ・ コ マン ド の 各 プ ログ ラム を 含ん で いる . 

ビル トイ ン ・ コ マン ド 以 外 の コマ ンド が 与え られ た 場合 は , 
ディ スク 上 の ファ イル 名 か ら 該 当 プ ログ ラム を 捜し 出し て , 
トラ ンジ ェ ン ト ・ コ マン ド と し て 実行 する . 


ディ スク ・ ド ライ ブ の セレ クト , ファ イル の オー プン , ク 
ロー ズ 。 リネ ー ム , イレ ー ズ ,。 リー ド , ライ : ト な どの ディ 
スク の 基本 的 な 操作 を ダイ ナミ ッ ク ・ ア ロケ ーション で 管 
理 す る CPM の 心臓 部 . 


それ ぞ れ の コン ピュ ー タ の ハー ドウ ェ ア に 合わ せ て , 独自 
に 作ら な けれ ば な ら な い , CPM の 中 で 唯一 の ハー ドウ ェ 
ア に 依存 する 部 分 . 

コン ソー ル へ の 入出 力 ル ー チ ン , ディ スク の リー ド ・ ラ イ 
ト ・ ル ー チ ン , プリ ンタ へ の 出力 ルー チン な どの , ハー ド 
ウェ ア と 直接 関係 する 各 IO ル ー チ ン な ど を 収め た 部 分 . 


A>, B> な どの プロ ンプ ト の あと に , ユー ザー が キー イ 


| 48K CPM の 場合 , CP プ M で は 使用 し な い 空 き エ リア . 
(* は 48K CPM の 値 ) 「 ユー ザー 独自 の VRAM や ROM な ど を 置く こと も で きる . 


Figure~1.1.0 CP ン M シ ステ ム の 構成 


CP ン M の 内 部 構造 と 機能 の 詳細 


1 .1 BIOS( 基 本 入出 カン ステ ム ) 


CP ン M は , どの 機種 の CPM で も 能力 は 同じ と いう 訳 で は あり ませ ん . も ちろ ん CPU の クロ ッ ク が 
異な れ ば , 処理 スピ ー ド が 違っ て くる の は 当然 で す が , 同一 機種 ご あっ て も , BIOS の 作り 方 次 第 で , 
例え ば ディ スク の 読み 書き に 要する 時 間 な ど は , 4 5 倍 の 差 が 出 て し まう の で す . 

ディ スク の アク セス ・ ス ピー ド に 関し て 言え ば , 8 イン チ ナチ 片面 単 密度 の “標準 ディ スク ” で は , デ 
ィ ス ク の 読み 書き の 際 の スキ ュー・ フ ァ ク タ (セク タ の 飛び 越し 数 . 後述 ) な ど が 決め られ て お り , 
よほど へ た な 設計 を し な い 限 り ,。 どれ も ほぼ 同じ スピ ー ド に な り ま す . し か し , 倍 密度 や , 4 倍 密度 
の フロ ッ ピ ー・ デ ヂ ディス ク ,。 それ に ハー ド ・ デ ィ ス ク に な る と , BIOS の 設計 の 良し 悪し で , 4 5 倍 , 
ある い は それ 以上 の 差 が 出 て し まい ます . 

良く で きた CPM と , そう で な い CP ン M の 差 は 。 ディス ク の アク セス ・ ス ピー ド だ け で は あり ませ 
ん .。 スク リー ン 表 示 に 関し て は , エス ケー プ ・ シ ー ケ ンス に よる カー ソル の アド レッ シン グ や , その 
他 の スク リー ン ・ コ ント ロー ル は 可能 か (6. 3 章 参 照 ), 外部 機器 と の イン ター フェ イス に 関し て は , 
プリ ンタ や 。 RS-232C と ポー ト な どの 1 プ O ポ ー ト が , CPM の フィ ジ カ ル ・ デ バイ ス と し て 自由 に 活用 
可能 か , キ ー ボ ー ド の 入力 に 関し て は , 割り 込み 処理 に よる タイ プ ・ ア ヘッ ド 機 能 ( 割 り 込 み 処理 と キー 
入力 バッ ファ に より , どん な に 高速 で タイ ピン グ し て も , また , CPM が どの よう な 仕事 を 行っ て い 
よう と , キー 入力 し た も の は , 1 文字 の 取り こぼし も な く 〈 く CPM に 入力 され る 機能 ) は ある か , な ど 
いろ いろ な 面 で ,「 単 に CP ン M が 走る あと いう だ け 」 の も の か ら , 「 ど ん な アプ リケーション に も 対応 で 
きる 良く で きた CP/M」 ま で, 元 は 同じ YCP ン M* で あっ て も , 大 き な 能 力 の 差 が 生じ て し まう の で す . 

CPM 上 の 多く の ソフ トウ ェ ア の 中 で も , 最近 の 進ん だ ソフ トウ ェ ア を 実行 する に は , 6 . 3 草 で も 
解説 する よう に 。 上記 の 各 機 能 (特に スク リー ン の コン トロ ー ル ) な ど が サポ ー ト され た だ “良く で き 
た CPM で な けれ ば , 実行 不可 能 な ソフ ト も 多く ある の で す . 

この よう な , CPM の 能力 の 差 が 生じ る 場所 が , これ か ら 解 説 を 行う 


BIOS (Basic Input Output System) 


で あり , この 部 分 を いか に 作る か (一 般 的 な ユー ザー に と っ て は , “作ら れ て いる か " で ある が ) に よ 
り , CPM 全体 の 能力 が 決定 され る の で す . 9 ー 

た だ し , これ ら の 能力 の 差 は , CPM 自身 の 関知 する こと で は あり ませ ん . あ くま で CPM 外 の 問題 
で す . 例え ば 。 エ スケ ー プ ・ シ ー ケ ンス に よる スク リー ン の コン トロ ー ル な ど は , パー ソナ ル ・ コ ン ピ ュ ー 
タ 自 身 の ス クリ ー ン 出力 ルー チン が 当然 持っ て いな けれ ば な ら な い 機 能 で ある の に , それ が な い . 仕 
方 が な い の で CP/M の BIOS 部 で その 面倒 を みる , と いう こと で す . ここ の 所 を 誤解 し な いよ うに し て 
下さ い 、. 
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BIOS( 基 本 入出 力 シ ステ ム ) 


で は , この BIOS 部 の 構成 , 機能 。 作り 方 な どの 基本 を 解説 し て 行き まし ょ う ). 


1.1.1 BIOS の 構成 と 機能 


それ ぞ れ の コン ピュ ー タ の ハー ドウ ェ ア に 合わ せ て 作ら れ た BIOS を ,\CBIOS* (Customized BIOS) 
と 呼び ます . こ こ で は , デ ジタル リサ ー チ 社 の マニ ュ ア ル の 中 に , サン プル と し て 提示 きれ て いる CBIOS 
の ジー ス ・ フ ァイル の 骨子 を 基 に , 解説 を 行い ます . 
傘 に , CBIOS の 構成 を ブロ ッ ク 図 で 示し ます . 
BDOS と イン ター フェ イス 


目 部 分 は , すべ て の 
BIOS に お いて CPM サ 
イズ に 従っ て 固定 され 
て いる 絶対 アド レス で 
ある . ユー ザー が 変更 
の 1 は を きか しい 


二 N いい E や | 


N ヽ 
ー。 


セク タ 変 換 ベ クト ル 8 


ーーx Mi 


ー 
に 


人 夫 。 
コー ルド ・ プ ブー ト , ウォ ー ム ・ ブ ー ト 
サ プ ブル ー テ チン 
BOOT: WBOOT: 

間 
ロジ カル |/ ン 0 デバ イス ハン ドラ 5 
各 サ ブ プ ブルー チン | 
CONST : CONN : CONOUT : LIST : 
PUNCH : READER : LISTST : 群 


ディ スク ・ ド ライ ブ 関 係 の 各 | ン 0 
ドラ の ・ サ ル ど 駐 委 

HOME : SELDSK : SETTRK : SETSEC : 
SETDMA : READ : WRITE : SECTRAN : 


この 生み タ ・ エ リ 了 チ は 。 
CPM の シス テム の メ 
モリ イメ ー ジ の 中 に 置 
か な く て も よい . つま 
り , BIOS 部 以後 の 高位 


各種 デー タ お よび スク ラッ チ ・ エ リア 
ia グ 、 徐 っ セ 委 放っ 了 っ イー スグ: 克 .。 


DMA ア ドジ の デー で E サ ア - さ ふさ ー ヽ 
ディ レク トリ ビア ロケ ーション - べ ベク レス の どこ に 置い 
そそ も ま も *. 


ドレ ーー チェ キーツ クー ベタ クト の フッ ラテ ァ 
s に 


ーーーーーーーーー 一 ーーーー 


Figure-1.1.1 CBIOS の 骨子 


CPM の 内 部 構造 機能 の 詳細 


CPM の ディ スク を 含め た すべ て の 入出 力 は , BDOS に ょ より, この BIOS を 通し て 行わ れ ま す .CP ノ 
M が , 何ら か の 入出 力 を 行 お うと する 時 , BDOS は , BIOS の 先頭 に 集め られ て いる それ ぞ れ の サブ プ ブル 
ー チ ン へ 導く だ ため の “JUMP ベク トル ” の 1 つ を コー ル し , その ベク トル に 導 か れ て 目的 の 機能 が 実 
行き れ ま す . また , 入出 力 が ディ スク 関係 で あれ ば , BDOS は , JUMP ベク トル の 次 の ブロッ ク に 位置 
する "ディ スク ・ パ ラメ ー タ ・ ヘ ッ ダ ” を ,。 JUMP ベク トル の 1 つ “SELDISK” を 介し て 参照 し デ 
ィ ス ク 管 理 に 必要 な 各種 デー タ が 格納 され て いる アド レス を 求め .、 その ディ スク の デー タ を 得る こと 
に よっ て すべ て の ディ スク 操作 を 行い ます . 

合計 17 個 の JUMP ベク トル は , どの よう な CPM の BIOS で も , 同じ CPZM サ イズ で あれ ば , その 
位置 する アド レス は 変わ る こと な く , 常に 同じ で あり , 必ず BIOS の 先頭 に 置か れ て いま す . 同時 に , 
それ ら の ベク トル の 順序 も 決め られ て お り , ユー ザー が 変更 する こと は で きま せん . 

この "JUMP ベク トル "が , それ ぞ れ の CPM サイ ズ に より , 固定 され て いる か ら こ そ , CPM は , 
どの よう な ハー ドウ ェ ア を 持っ た マシ ン の BIOS で も , 迷う こと な く (1 番 目 は BOOT, 4 番目 は コン 
ゾール 入 力 ,、 * や タ な ど と 決ま っ て いる の で ), すべ て の 入出 力 を 行う こと が で きる の で す . 

次 に 。 Figure-1.1.1 に 示し た “CBIOS の 骨子 ” の ブロ ッ ク 図 に 対応 する , 実際 の アセ ンプ ブリ ・ ソ ー 
ス ・ プ ログ ラム の アウ トラ イン を 示し ます . リス ト 中 の ^"……" で 区 切ら れ て いる の が , それ ぞ れ Figure 
-1.1.1 に 示し た ブロ ッ ク の 区 切り に 当り まず す 、 

ここ に 示す の は , デジ タル リサ ー チ 社 が 提供 し て い る CBIOS の 骨子 の ソー ス フ ァ イル , “CBIOS. ASM" 
を .48K CP ン M 用 に アセ ン ブ ル し た PRN リス ト の アウ トラ イン で す . リ スト 冒頭 の , ラベ ル “MSIZE" 
の 値 を 。 それ ぞ れ の マシ ン の 設定 可能 な 最大 メモ リ 容 量 に 合わ せ て アセ ン ブ ル す る こと に より , 任意 
の サイ ズ の CP/M の BIOS を 作る ゐ こ と が で きる よう に な っ て いま す . 


QA>TYFE CBIOS48B.PRN / 


ーー 


| celoS の 他 8K CPM の 場合 ) | 
1 に 


5 
MS1IZE EQU 4B sCF/M VERSION MEMORY SIZE IN KILOBYTES 


| BIAS” は , 使用 する コン ピュ ー タ の 使用 能 メ モリ 府 考 に 合わ ば て 。 
CP ン M サ イズ を 設定 する 場合 の , アド レス ・ オ フ セ ッ ト 値 で ある , 


20KCP ン M の 場合 , CCP の 始ま り は アド レス 3400H で ある . 
BIAS EQU (MS TIZE-20) *1024 


CCP EQU さ 4OOH+BIAQS 3 BASE OF CCP 
BD0S EQU CCP+BO6H BASE OF BRDOS 
BIOS EQU CCP+ 16OOH s BASE DF BIOS 
CDISK EQU QOQ4H 』CURRENT DISK NUMBRER O=R。 
IDBYTE EQU OQOSH 』INTEL 1/0 BYTE 


| BAOO ORG BIOS 1ORIGBIN OUF THIB PRODGRAN 
| OO2C = NSECTS EQU ($-CCP ) / 1 28 # MARM BTART SECTOR COUNT 
0 に それ ぞ れ の け ブ ルー チン へ の ジャ ンプ ・ ペ ベク トル 
自 定 の 総和 7 ドレ ジャ ンプ 先 の アド レス は , それ ぞ れ の CBIOS に より 実 な る . 
JMP BOOT 3 CDLD BTART 
MBOOUTE』 JMP MBOOT # MARM BTART 
| JMP CONST CDNSOLE BTATUS 
JMP CONIN 3 CDUNSODLE CHARACTER IN 
JMP CONOUT CONSOLE CHARACTER OUT 
JMP LI5T #LIST CHARACTER OUT 
DBB CBIS の 作り 方 に JMF PUNCH # PUNCH CHQRACTER OUT 
FBB| より , 名 サ プ ブル ー JNP READER 8 REQDER CHARACTER OUT 
4BB| チン の アド レス は JNP HOME 5 MOVE HEAD TO HOME POBITION 
| 5ABB| 恋 ( じ る. JMP SELDSK 3 SELECT DISK 
| JMP BETTRK 3SET TRACK NUMBER 
| JMP SETSEC # SET SECTDR NUNBER 
| JNMP SETDMA 8SET DNMA ADDRES8 
JMP READ 3 READ DIBK 
JNMP MRI TE #MRITE DI1SK 
JMP LISTST 5 RETURN LIST STATUS 
JMP SECTRAN #SECTUR TRANSLATE 
9 
* イン チ 刻 面 単 密度 の 標準 ディ ス フ を 使っ つっ を, 4 ドラ イブ プ ・ シ ステ ム 用 の 
和 デイ スン ・ パ ラメ ー ツ ・ テ ー プ ル 
# 
H DISK PQRAMETER HEADER FOR DISK QQ 」 
3 F さ BAOOOO DPBASE』 DM TRANS , OOOOH | 
OOOQQOQQO Du OOOOH。 OOOOH | 
B_ FOBCBDBA DM DIRBF 。 DPBLK | 
ECBD7OBD Dw CHKOO。 ALLOO テ ョ 
H DISK PARAMETER HEADER FOR DIBK O1 | イ 
7 さ BAOOOO Du TRANS 。 OOQOH | ズ 
| QOOQoOooo DMw OOOOH。 OOOOH | プ 
FOBCBDBA DM DIRBF 。 DPBLK | パ 
FCBDBFBD Dw CHKO1 。 ALLO1 に 
DISK PARAMETER HEADER FOR DISK O2 | メ 
73 さ BAOOOO Dw TRANS 。 OOOOH に た 
OOQoQoQo Dw QOoOH , OOQOH | ツ 
B FOBCBDBA Du DIRBF 。 DPBLK へ 
| OCBEAEBD Duw CHKO2。 ALLO2 | リ 
| DISK PARAMETER HEADER FDR DISk Os | マ 
7 さ BAQOOOO Dw TRANS 。 OOOQH | 
| (ele1116) Duw ooooH, OOooH [ 
| BI FOBCBDBA Du DIRBF 。 DPBLK 
1CBECDBD Du CHKO さ 。 ALLO さ へ 
ご これ 以後 の アド レス は 各 # 
| CBIOS に より 一 定 で は な い 5 SECTOR TRANSBLATE VECTOR セ っ 
, BA7S O1O7OD1 さ TRANSB』 DB 1 。7。1 さ 。19 3 SECTORB 1。2。 さ 。4 ジム 
BA77 1905OB1 1 DB フ 29。43 1 。17 3SECTORB 5。6。7。8 1 タダ 
BA7B 17O さ O9OF DB 2 さ 。 さ 。9。 35 5SECTORS 9。10。11。12 受 て 
BA7F 15O2OBOE DB 21 , 2,8。14 # SECTORB 1 さ 。 14, 15。16 「 燃 03 
BAB さ 141A06OC DB 20 。 26。 6。 12 # SECTORB 17。18。19。2O | づ ビ 
BAB7 1218Q4QA DB 18。24, 4,10 3 SECTORB 21。22。2 さ 。 。24 | ソ 共 
BABB 1O16 DB 16。22 5 SECTORB 25。26 / ルル 通 
H 。。 
DPBLKi  』DIBK PQRQAMETER BLOCK。 COMMON TO ALL DIBSBKB ア 
BABD 1AOO Du 26 SECTORS PER TRACK 」 っ 
BABF O さ DB さ # BLOCK BHIFT FACTOR | つ 
BA9O O フ 7 DB 7 # BLOCK MABK に ん 。 
BA91 OO DB o 』 NULL MABK ウス 
BA92 F2OO Dw 242 3DISK BIZ7E-1 | ユン 
BA94 さ FOO DuM 6 さ 8DIRECTORY MAX 「| 00 
| BA96 CO DB 192 #aLLDC O | る ) 
| BA97 Oo DB o ALLOC 1 | ヶ 09 
BA9B 10OO Du 16 # CHECK SIZE | 品 拓 
BA9A O20O Dw 2 #TRACK OFFSET | ツ 通 
END OF FIXED TABLES クン 


1 で SI ヤツ 
ペー プ 


、ー ボ 


こよ / 」 
MS 8 


ご 


y 低 瑞 ご 9fS こ JNI 昌和 イロ ロス の ー ロ / 契 


f 


iii 


攻 の 1 いす の ト つ 


CPM の 内 部 構造 機能 の 話 細 


BA9C 


EAA6 


BR1 1 


BBR24 


BR さ 7 


BB49 


BB4B 


BB4D 


RB4F 


BBS4 


BBSA 


BB7D 


BR92 


ーーーーーーーーーーーーーー ニ ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ーー 一 ーー ニー 


コー ルド ・ ブ ー ト , ウォ ー ム ・ ブ ー ト に 関す る 一 連 の け ブ ルー チン . 
( 注 : "ーー" 記号 は コー ザー に よる ルー チン を 表す ) 


BIMPLEST CaSE 1S TO JUST PERFORM PQRANETER INITIQALIZATION 
-1O バ イト , ロブ イン ・ デ ィ ス ク No. な どの イニ シャ ライ ズ 
JMP GOCFN sINITIALIZE AND GO TO CP/MNM 


38IMPLEST CQSE 18B TO READ THE DISK UNTiL ALL SECTORS LOADED 
ーー コー ルド ・ ブ ー ト ・ ロ ー ブ と BIOS 部 を 除く , シス テム ・ ト ラッ ソフ 全体 を 読み 出し て , 


メモ リ に ロー ド す る . 
5 END OF LOAD OPERATION。 SET PARAMETERS AND GO TO CP/M 
BOCFMs < ーー ウォ ー ム ・ ブ ー ト の だ め の 0 H の ジャ ンプ ・ ベ ペク トル , シス テム ・ コ ー ル の だ め の 5 H の 
BDOS へ の ジャ ンプ ・ ベ クト ル の セッ ト , それ に DMA ア ドレ ス の ゼット な ど 
JMP CCP ぇ * GO TU CP/M FOUR FURTHER PRDCESS1NG 


ーー ニー ュー ニーーーmーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ニ ーー ビー 琴 琴 ーーーーーーー ッ ボーーー 


4 つの ロジ カル ・ デ バイ ス の 如 ハ ンド ラ の サ プ ル ー チ ン . 
それ ぞ れ の コン ピュ ユー の ハー ドウ エア に 合 わせ て 作成 する . 
この 例 で は ,IO バ イト に よる フィ ジ カ ル ・ デ パイ ス の サポ ボー ト は 行 つ て いな い . 


ICUNSTi| CUNSOLE タン RETURN QFFH IF CHARACTER READY。 OOH 1F NOT 


こと ー CON ^” の ステ ーッ タス ・ チ ジッ リバ ルー チン 
RET 


* 
5 CDNSDLE CHARACTER 1NTO REGISTER ^A 


ーー *CON : ” の 1 文字 入力 ルー チン , 
RET 


* 
CONOUTs 0 CHARACTER OUTFUT FRODM REGISTER C 
CON 


ーー ・ 々 の 1 文字 昌 カ ルー チン 
RET 3 


* 
LISTi| LIBSI JE FROM REGISTER = 


ーー *LST :^ の 1 文字 HH カル ー チ 
RET 


* 
LISTSTs の し STATUS (Q IF ay READY。 1 IF READY) 
ャ パコ ? の ステ ー ツ マス ・ チ エッ フ ・ ル ー チ ン . 

RET 


1 
PUNCHi| sPUNCH CHARACTER FROM REGISTER ヒビ 
NPBUN : ” の 1 文字 は 力 


RET 


READER:s| sREAD さら INTO REBISTER QA _ FROM READER DEVICE 
ーー / の 1 文字 入 ル ー チ ン . 


ーーーーー ニ ーー バーーーーーーーー ニ ーー ニーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 


ぇ HOVE TO THE TRACK QO _ POSITION ロ F CURRENT DRIVE 


H TRANBLATE Ll CALL INTOD A SETTRK CALL MITH PARAMETER QQ 
> ME べ の シー ジ ・ ル ー チ ン 
RET ODN FIRBT READ/MRITE 
H 
SELDSK : 3 SELECT DISK GIVEN BY REGISTER C 
ペー ハン ドラ イブ 選択 ルー チン . 
RET 
『 
SETTRK SET TRACK BIVEN BY REBISTER C 
が トラ ッ ク No. セツ ッ ト ・ ル ー チ ン . 
RET 
H 
SETSEC ョ 3SET SECTOR GIVEN y REBISTER C 
ャ ーーーSy NO、 ゼ ツ に ・ ル ー チ テン 


RET 


BI 〇 (基本 入出 力 シス テム ) 


: 
BBA7 [SECTRANi] 
5 TRANSLATE THE SECTUR GIVEN BY BC USING THE 
5 TRANSLATE TABLE GIVEN BY DE 
ーー セン フタ No. 変換 ルー チン . 


RET MITH VALUE IN HL 
: 
BRAD SETDMAQr 3SET DNQA ADDRESS GIVEN BY REBISTER ヨ B B AND C 
ーーDMA パ バッファ セッ ト ・ ル ー チ ン . 
RET | 
1 | 
BRBC さ 3PERFURM READ _ ロ PERATION (USUALLY THIB IS SIMILAR TO MRITE 
* SU ME MILL ALLOM SPACE TU SET UP READ CDMMAND。 THEN USE 
* CONMMON CODE IN MRITE) 。 
ャ ーー1 セ クタ リー ド ルー チン . 
RET 
け | 
BBD6 IMRITEi| 』PERFODRM Q WRITE OPERAT ION | 
ここ ーー] ンタ ライ ト ルー チン 
RET 


CBIOS の 後 の 適 当 な 所 に , 次 の デー マ ・ エ リア を 確 呆 す る 
ご これら の デー ツタ ・ エ リア は ,。 イニ シャ ライ ズ す る 政 要 は な ご . 
CP M シ ステ ム の メモ リ ・ イ メー ジ の 中 に 含め な こ て も よい 


| これら の アド レス は , 
| CBIOS の 作り 方 に 』 
よ つ て 一 定 で は な い . 


W 1 
RCE9 TRACK』 DS 2 MG MVS FN PANSTGN 、 こ し し ここ 
BCEB SECTOR』 DS 2 ITMOD BYTES FOR EXPANSION ーー つと の 
RCED DMAQDr DS * !DIRECT MEHORY ADDRESE | 区 コブ イブ - | 
BCEF DISkNOr DS 1 5 DISK NUMBER O-15 の ピー 
1 
SCRATCH RAM AREA FOR BDOS USE | 
BCFO = BEGDAT EQU * ) BEGINNINB OF DATA AREA | 
BCFo DIRBF DS 128 3 SCRATCH DIRECTORY aREA | 
BD7o ALLOo』 DS さ 1 ) ALLOCATION VECTOR oO 
BDBF ALLO1: DS さ 1 3 ALLOCATIDN VECTOR 1 この エリ ア は , ティ スク フ 
BDaE ALLO2』 DS さ 1 1 ALLOCATION VECTOR 2 |! ラッ ー ク . ヘ ッッ に よっ て 
BDCD ALLOS』 DS さ 1 5 ALLDCATION VECTOR 3 | カド に レス きれ て いる 
BDEC CHKOO』 DS 16 ) CHECK VECTOR O 
BDFC CHKO1r DS 16 CHECK VECTOR 1 | 
BEoC CHKO2』 DS 16 1 CHECK VECTOR 2 
BE1C CHKOS』 DS 16 5 CHECK VECTOR < 
! 
BE2C = ENDDAT EgoU * END OF DATA AREA 
O13C = DaTSIz EQU *-BEGDATs SIZE OF DATQ ARE 
RE2C END 
> / 


Figure-1 .1.2 48K CPM の CBIOS の ソー ス ・ リ スト の 骨子 . 


17 個 の JUMP ベク トル に よっ て 導 か れる それ ぞ れ の サブ ルー チン を , リス ト 中 で は 次 の よう な 形式 
で 示し て お きま す . 


ラズ ベル 名 ・ , この サブ ルー チン の 機能 
ー( ユ ー ザ ー に よる ルー チン ) 
RET 


これ ら の サブ ルー チン は , CBIOS を 作ろ うと する ユー ザー が , それ ぞ れ の マシ ン に 合わ せ て 作ら な 
けれ ば な り ま せん . 


CPM の 内 部 構造 と 機能 の 詳細 


次 に 動作 の 一 例 と し て , BDOS が ^*CONIN/ (コン ソー ル か ら の 1 文字 入力 ) を コー ルレ し た 場合 の BIOS 
内 の 処理 の 流れ を 図示 し て お きま す . 


JUMP ベク トル 


BDOS か ら コ ン ソ ー ル | 


スカ が 呼ば れる . 。 | CONN の JUMP ベク トル に より , 


サブ ルー チン \CONIN : "へ ジャ ンプ する . 


周辺 装置 入出 力 サ ブル ー チ ン 


コン ソー ル と の イン ター フェ イス 


ーー 


コン ソー ル か ら 入 力 さ れ 
た アス キー・ コ ー ド を, 
A レ ジス タ に セッ ト し て 請 縛 た 
BDOS に 帰る . ーー ここ ここ 


Figure-1 .1.3 CBIOS 内 の 処理 の 流れ 
次 に 。 各 サ ブル ー チ ン の それ ぞ れ の 機能 の 内 容 を 解説 し ます . 
* 」UMP ベ クト ル に より 導 か れる 各 サ プ ブルー チン の 機能 


各 サ ブル ー チ ン の 入出 力 条件 を , JUMP ベク トル の 並び 順に 示し まま か と ご 桂馬 舎 枯 條 vV 寺本 札 ぞ 
れ の 内 容 は 。 各 ル レー チ ン で の 最低 限 必要 な 処理 で あり , 他 に 必要 が あれ ば , ユー ザー 独自 の も の を 拡 


張 し ます . 
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BIO 〇 (基本 入出 カシ ステ ム ) 


BOOT : (コー ルド ・ ブ ー ト ) 
コー ルド ・ ス ター ト ・ ロ ー ダ か ら 引 き 継 が れ , シス テム の 基本 的 な イニ シャ ライ ズ を 行う ルー チ 
ン で ある . 次 の “WBOOT” と も 関連 する の で , 共通 の ルー チン "GOCPM^ を 設け (リス ト 参 
照 )、 ここ で は , 1O バ イト の セッ ト と ドラ イブ A : を 選択 する た め に , アド レス 03H (ログ イン ・ 
ディ クス No. の 格納 バイ ト ) を 0 に セッ ト し て , ラベ ル "GOCPM” ヘ へ ジャ ンプ すれ ば よ い 。 その 
他 こ こ で 有 刻 要 な も の が あれ ば 付け 加え , あ と の 処理 は "WBOOT? の ルー チン と 共通 の “GOCPM/ 
で 行え ば よい . 


WBOOT: (ウォー ム ・ プ ブー ト ) 
キー ボー ド か ら の Ctrl-C の 入力 時 や 、 アド レス 0000H へ ジャ ンプ し た 時 な どの ウォ ー ム ・ ス ター ト 
(リプ ブー ト ) の 際 に 呼ば れる ルー チン で あり , 次 に 示す 各 イ ニシ ャ ライ ズ を 行う . 


O デ ィ ス ク の シス テム ・ ト ラッ ク か ら , BIOS を 除い た すべ て を 読み 出し , メモ リ 上 に 再 ロ ー ド 
する . ' ' 

oO アド レス 00Hー02H に , ウォ ー ム ・ ス ター ト の ジャ ンプ ・ ベ クト ル を セッ ト す る . 

oO アド レス 05Hー07H に , シス テム ・ コ ー ル の た だ ため の BDOS へ の ジャ ンプ ・ ベ クト ル を セッ ト す 
る . 

O ロ グイ ン ・ デ ィ ス ク No. (アド レス 03H の 値 ) を C じ レジ スタ に セッ ト し て , CCP の 先頭 に ジャ 
ンプ する . 


CONST : (コン ソー ル ・ ス テー タス ) 
現在 の "CON :” に 割り 当て られ て いる デバ イス の ステ ー タ ス を チェ ッ ク す る . READY で あれ 
ば FEFH, BUSY で あれ ば 00H を A レ ジス タ に セッ ト し て リタ ン す る . 


CONIN : (コン ソー ル ・ イ ンプ ッ ト ) 
現在 の "CON : ” に 割り 当て られ て いる デバ イス か ら 1 文字 を 入力 し ,。 その アス キー・ コ ー ド を 
AA レジ スタ に セッ ト し て リタ ン す る . デジ タル リサ ー チ 社 の マヤ マニュアル に は , 最上 位 ビ ッ ト を 0 
に する よう 指示 が ある が , その 必要 は な い ( カ ナ や 。 グラ フィ ッ ク ・ キ ャ ラク タ に 対応 する に は ). 
この ルー チン は , 入力 が な い 場 合 は 内 部 で 入力 が ある まで ルー プ さ せる こと . 


CONOUT : (コン ソー ル ・ ア ウト プッ ト ) 
現在 の “CON : ” に 割り 当て られ て いる デバ イス に , C レ ジス タ に セッ ト さ れ て いる アス キー・ 
コー ド を 出力 する . 


CPM の 内 部 構造 こ 機能 の 詳細 


BS まく 。 ストア ウド プット) 
現在 の “LST : ” に 割り 当て られ て いる デバ イス に ,。 C レ ジス タ に セッ ト さ れ て いる アス キー・ 
NR 2 の の 


PUNCH : (パン チ ・ ア ウト プッ ト ) 
現在 の "PUN : ′ に 割り 当て られ て いる デバ イス に , C レ ジス タ に セッ ト さ れ て いる アス キー・ 
ラード を 出入 する 。 


READER : (リー ダ ・ イ ンプ ッ ト ) 
現在 の “RDR : "に 割り 当て られ て いる デバ イス か ら 1 文字 を 入力 し , A レ ジス タ に セッ ト し て 
リタ ン す る . 入力 が な い 場 合 は , 入力 され る まで 内 部 で ルー プ す る . これ も , “CONIN” の 場合 
と 同様 に 、 最 上 位 ビ ッ ト を 0 に する 必要 は な い . 


HOME : (ホー ム へ の シー ク ) 
ログ イン ・ デ ィ ス ク の ヘッ ド を ,。 ホー ム 位 置 (トラ ッ ク 00) に シー ク す る . 後述 の “SETTRK" 
ルー ナン を 利用 し て も よい . 


SELDSK、 (セレ クト ュ チ イィ スクッ ドア イブ ) 
C レ ジス タ に セッ ト さ れ て いる ドラ イブ No、(A・ ニ 0、B・ 三 1。 “の 2 二 15) の ドア イダ を 
選択 する た め の ル ー チ ン . 
C レ ジス ムタ に セッ トト され て いる ドラ イダ No.、 に 廷 う っ て, て の ドラ イフ の ディ スク ・ パ ジー テク * 全 
ッ ダ の ベー ス ・ ア ドレ ス (リス ト で は , それ ぞ れ , BA33H, BA43H, BA53H, BA63H に 当たる ) 
を H, し レジ スタ に セッ ト し て リタ ン す る . も し , 存在 し な い ド ライ ブ が 選択 され た 場合 は , H 
し レジ スタ に 0000H を セッ ト し て リタ ン す る 。. 実際 の 動作 は , リー ド ノ ラ イト の 直前 に 行え ば よい 
( 注 ). 


SETTRK ・: (セッ ト ・ ト ラッ ク ) 
B, C レ ジス タ ( フ ロッ ピー・ デ ィ ス ク で あれ ば , 256 ト ラッ ク 以 下 で ある の で , C レ ジス タ の み 見 
れ ば よい ) に セッ ト さ れ て いる 値 の トラ ッ ク No. に , ヘッ ド を シー ク す る . 実際 の 動作 は , リー ドン 
ライ ト の 直前 に 行え を ば よい ( 往 ). 


SETSEC : (セッ ト ・ セ クタ ) 
B.。C レ ジス タ に セッ ト さ れ て いる 値 の セク タ No. を , ディ スク ・ コ ント ロー ラ に 送り 込む . 実際 
の 動作 は 。 リー ドブ プラ イト の 直前 に 行え ば よい ( 注 ). 


BIOS( 基 本 入出 力 システム ) 


SETDMA : (セッ ト DMA ア ドレ ス ) 
B、C レ ジス タ に セッ ト さ れ て いる アド レス (デフ ォ ー ル ト は 0080H。 その 他 の 値 は 。 ユー ザー の 
シス テム ・ コ ー ル に よる 設定 で 任意 ) に 。 ディ 0 ト を 行う 際 の 128 バ イト の 入出 
カバ ッ フ ァ を 設定 する . 
要する に , ここ で 設定 され た バッ ファ を 介し て , リー ド ノ ラ イト 時 の デー タ の 入出 力 が 行わ れる . 


KREAD: (ディ スク ・ リ ー ド ) 
"SELDSK"。 SETTRK"、 SETSEC* で ,。 あら か じ め 指 定 さ れ て いる 1 セク タ の デー タ を 読み 
出し , DMA バ ッ フ ァ に 格納 する . 
セク タ ・ リ ー ド が 正常 に 行わ れ た 場合 は 00, も し 回 復 で き な い エラ ー を 起こ し た 場合 は 01 の エラ 
ー・ コ ー ド を レジ スタ に セッ ト し て リタ ン す る . た だ し , エ ラー が 起こ っ た 場合 。 普通 は 10 回 程 
度 の リト ライ を 行う . 
エフ ー・ コ ー ド に より , BDOS は エラ ー・ メ ッ セ ー ジ を 出力 する . 


WRITE : (が イス ペク グ タ ウイ 沙 ) 
DMA バ ッ フ ァ の 1 セク タ の デー タ を , ディ スク に 書き 込む . その 他 は 上 記 *READ* の 場合 と 全 
く 同じ . 


LISTST : (リス ト ・ ス テー タス ) 
現在 の "LST : "に 割り 当て られ て いる デバ イス の ステ ー タ ス を チェ ッ ク す る . READY な ら FFH, 
BUSY な ら 00H を A レ ジス タ に セッ ト し て リタ ン す る . 
バッ ク ・ グ ラウ ンド ・ プ リン ト ア ウト ・ プ ログ ラム の “DESPOOL′ な ど で こ の ルー チン が 利用 き 
れる . 通常 は 00H と な る よう に し て お く こ と . 


SECTRAN : (セク タ ・ ト ラン スレ ー タ ) 
ディ スク の リー ドブ プラ イト を 少し で も 高速 に 行う 目的 の ,。 スキ ュー( セ クタ の 飛び 越し 読み 
後述 ) を 行う) ため の , ロジ カル ・ セ クタ ラフ ィ ジ カル ・ セ クタ の 変換 レー チン で ある . 
ロジ カル ・ セ クタ No. が B、 じ レジ スタ に , セク タ 変 換 テ ー ブ ル の 先頭 アド レス が D, E セ レジ スタ に 
セッ ト さ れ , 当 ル ー チ ン が コー ル さ れる . 変換 され た フィ ジ カ ル ・ セ クタ No. は , HH し レジ スタ 
に セッ ト し て リタ ン す る 。. 


注 ) これ ら の パラメータ を , Figure-1 .1.2 の ア ドレ ス BCE9HーBCEFH の バッ ファ に セッ ト し て お 
き , リー ドグラ イト の 直前 に 一 括 し て 実行 すれ ば よい . 
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ここ で て 示し た CBIOS の ブロ ッ ク 図 や ,. ソー ス ・ リ スト , 各 ル ー チ ン の 機能 な ど は , 標準 的 な を CPM 
を 動作 させ る た め の 必 要 最 少 限 の BIOS で あり , IO バイ ト に よる ロジ カル ・ デ バイ ス に 対す る 各 フ ィ ジ 
カル ・ デ バイ ス の 選択 や それ ら の ドラ イ バ ・ ル ー チ ン な ど は 含ま れ て いま せん . 

IO バイ ト を 利用 する 場合 は 、 4 つの ロジ カル ・ デ バイ ス の 各 ル ー チ ナン (ステー タス ・ チ ェ ッ ク ・ ル 
ー チ ン も 含む ) の それ ぞ れ の 冒頭 に アド レス 03H の IO バイ ト の 値 を みて , その 値 が 指示 する デバ イ 
ス を 選択 する た め の “デバ イス ・ セ レク ト ・ ル ー チ ン ?” を 設け な く て は な り ま せん . その 上 で 。 それ 
ら の フィ ジ カ ル ・ デ バイ ス 自 身 の ル ー チ ン を 設け る 訳 で す . 

その 他 。 "良く で きた 使え る CP ン M* に する た め に は , オプ ショ ン 的 な 各種 機能 を .。 それ ぞ れ の ルー 
チン に 盛り 込む 必要 も ある で し ょ う . 一 方 ,. フィ ジ カ ル ・ デ バイ ス や , ロジ カル ・ デ バイ ス の 中 で , 
も し 使う 必要 が な い 周 辺 装置 が ある な ら ば , それ ら の サブ ルー チン は 書く 必要 は あり ませ ん . その 場 
合 は , も し 誤っ て コー ル さ れ た 場合 の 暴走 を 防ぐ た め に , ヾ RET? 命令 を 書い て お き , 何 も せ ず に リタ 
ン す る よう に し て お く 〈 く の が 良い で し ょ う . 


ユー ザー・ プ ログ ラム か ら 各 エン トリ ・ ポ イン ト の 直接 CALL 

前 述 の 17 の JUMP ベク トル は , BOOT” と "WEBOOT” を 除き , それ ら に 続く ルー チン は , 最後 が 
*RET? 命令 で 終わ る サブ ルー チン の 形式 を と っ て いま す . よっ て , 2 章 で 解説 する "シス テム ・ コ 
ー ル ^ を 利用 し な く て も ,。 JUMP ベク トル に 導 か れる 17 の 機能 は 。 この エン トリ ・ ボ ポイ ント に 対す る 
委 CP ン M サ イズ に 固有 の 絶対 アド レス を , 直接 に CALL す る こと に より , それ ぞ れ 実行 する こと が で 
きま す . BOOT*。 “WBOOT” の ルー チン は , サブ ルー チン で は あり ませ ん が , スタ ッ ク ・ ボ ポイ ンタ 
も イニ シャ ライ ズ し ます の で , “CALL/ 命令 で も “JMP 命令 で も どちら で も 実行 可能 で す . 

この BIOS エ ント リ ・ ポ イン ト の 直接 CALL に よる メリ ッ ト は , 


① コン ソー ル な どの 周辺 装置 の 入出 力 に 関す る も の で は , シス テム ・ コ ー ル に 伴う BDOS 内 で の オ 
ー バ ・ ヘ ペッ ド (目的 の 機能 が 実行 され る まで に 介在 する 各種 ルー チン ) が 省 か れる の で , その 
分 だ け 処 理 が 高速 に な る . 「 

② BDOS に 一 切 関係 せ ず 各 処 理 が 行え る . 

③ シス テム ・ コ ー ル の 機能 に は な い , 任意 の セク タ の リー ドブ ライ ト が 可能 で ある . 


な ど が 挙 げ ら れ ま す . 

CALL の 具体 的 な 方 法 は , CALL に 際 し パラ メー タ が 必要 な も の は , それ ぞ れ の レジ スタ に パス ・ パ 
ラメ ー タ を セッ ト し て , それ ぞ れ の JUMP ベク トル の 絶対 アド レス を CALL す れ ば よい 訳 で す . 

例え ば Figure-1.1.2 の 48K CPM で は , 


1 人 4 
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じ に レジ スタ で 出力 キャ ラク タ 
CALL BA0OCH 


を 実行 する こと に より , コン ソー ル に 任意 の 1 文字 を 出力 する こと が で きま す . 

し か し , CPM の サイ ズ は 20K 一 64K ま で 様々 で す の で , 実際 の アプ リケーション に は , どの CP ン ノン 
M サ イズ に 対し て も 実行 可能 と な る よう に , アド レス 0000H-0002H に ある“WBOOT” の エン トリ ・ 
ポイ ント に 示さ れ て いる アド レス を 基 に , その 他 16 の JUMP ベク トル 自身 の アド レス を 算出 する と い 
う テ クニ ッ ク が よく 使わ れ て いま す . 「 

炊 に , BIOS JUMP ベク トル ・ エ ント リ ・ ポ イン ト の 一 覧 表 を 示し て お きま す . 


BOOT =4A00(20K), 7A00(32K ), BA00(48K), FA00(64K) 
ーーーーーーーーーーーーーーーーーーーーーーー 一 


C 0 


BOOT コー ルト ドッ フート 


WBOOT ウォ ー ム ・ プ ブー ト Cー ド ライ ブ N0. 
CONST コン ソー ル ・ ス テー タス ・ チ ェ ッ ク の 
CONIN コン ソー ル 入 力 A 一 入力 キャ ラク タ 
CONOUT コン ソー ル 出 力 

LIST リス ト 出 力 C 二 出力 キャ ラク タ 

PUNOCH パン チ 出 力 

READER リー ダ 入 力 一 A 一 入力 キャ ラク タ 
HOME ヘッ ド の ホー ム ・ シ ー ク 5 Es 
SELDSK ディ スク ・ ド ライ プ ブ の 選択 C 一 ドラ イブ No. HLーDPH 
SETTRK トラ ッ ク No. の セッ ト C 一 トラ ッ ク No. 

SETSEC セク タ No. の セッ ト C 一 セク タ No. 

SETDMA DMA ア ドレ ス の セッ ト BC<-DMA ア ドレ ス 

READ 指定 され た セク タ の リー ド 0 
WRITE / ライ ト ー 
LISTST リス ト ・ ス テー タス の チェ ッ ク AFFH ン 00 
SECTRAN セク タ ・ ト ラン スレ ー タ BC ロジ カル ・ セ クタ No (レデ ィ ー グ ビジ ー) 


HL 一 フィ ジ カ ル ・ 


・ テ ー ブ ル ・ ア ド 
レス 


BIOS JUMP ベク トル ・ エ ント リ ・ ポ ボ ポイ ント 


1.1.2 ディ スク ・ パ ラメ ー タ ・ テ ー プ ルレ 


CBIOS の ブロ ッ ク 図 や ,、 ソー ス ・ リ スト に 示さ れ て いる よう に , "JUMP ベク トル ? に 続く エリ ア は , 
"ディ スク ・ パ ラメ ー タ ・ テ ー ブ ル ” と 呼ば れる , ディ スク の 入出 力 を 行う 際 に 必要 な , 各 デ ィ ス ク ・ 
ドラ イブ に 関す る 情報 を 保管 する た め の エ リア が 置か れ て いま す . 
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ディ スク ・ パ ラメ ー タ ・ テ ー ブ ル は , 次 に 示す 3 つの 部 分 か ら 構 成 さ れ て いま す (Figure-1.1.1 お 
よび Figure-1.1.2 も 参照 ). 


1 ディ スク ケー が 芝 メ ーッ タダ 
2 ここ 形 グ ダー トラ ンズ セレ セード る テー ブル 
と の に ジマ 錠 メー 59 の ロウ 


この を 生れ に 2 いて で 庁 本 で 毎 き まし しょう. 2 宇 の し (システ な こう ラル の ファ ンズ アシ ジョン 
27、 31. 35 な ど と も 密接 な 関係 が あり ます の で , 相互 に 参照 し て 下さ い . 


ディ スク ・ パ ラメ ー タ ・ ヘ ッ ダ 

DPH と 呼ば れ , CBIOS の リス ト に 示さ れ て いる よう に , 4 ドラ イブ ・ シ ステ ム で あれ ば 4 個 。 n ド 
ライ ブ ・ シ ステ ム で あれ ば 1n 個 と いう よう に , 各 ド ライ ブ に それ ぞ れ 独立 し た DP 是 を 設け ます . 

DPH の 構成 を , Figure-1.1.2 の CBIOS の リス ト を 例 に 解説 し まし ょ う . 

リス ト で は 。 1 個 の ドラ イブ の 各 パ ラメ ー タ を 。 1 ライ ン に 4 バイト ずつ , 4 ラ ィ ン に 分 け て 書い 
で あり まず す が, ここ で は 棋王 列 に 並べ て 示し ます . 


16 バ イト KN 
- ae 6 メキ バア ロー プ ・ が アロ ゲ ケーション * 
トラ ンス レー ト ・ テ ー ブ ル ディ レク トリ ・ バ ッ フ ァ ブロ ッ ク チェ ッ ク ・ ベ クト ル 6 ま か ルー 


BDOS が スク ラッ チ ・ パ ッ ド と し て 使用 . 


各 ド ライ ブ の ディ スク ・ パ ラ | 各 デ ィ ス ク の 使用 状況 を 管理 
メー タ ・ ブ ロッ ク の 先頭 アド | する た め に BDOS が 使用 する . 
レス を 示す . 同一 ドラ イブ の | スク ラッ チ ・ パ ッ ド の 先頭 アド 


各 ド ライ ズ の ね を 導 ・ ょ トラ ンス レー 場合 は 。 | つの パラ メー タ ・ | レス . 各 ド ライ ブ が 独立 し て 
ト ・ テ ー ブ ル の 先頭 アド レス を 示す . ブロ ッ ク を 共用 で きる . 持つ . 
ス キュ ー を か け な い 場合 は , 0000 を 入 
れる . 同一 ドラ イブ の 場合 は , | つの BDOS が, ディ レク トリ を 操作 する 各 デ ィ ス ケッ ト 固 有 の ディ レク ト 
テー ブル を 共用 で きる . だ 、 ス クタ クラッチ ・ バ パッ ヤヤ を しそ リ 情報 を ソフ トウ ェ ア ・ チ ェ ッ ク 
使用 する 128 バ イト の エリ ア の 先 する た め の ス クラ ッ チ ・ パ ッ ド の 先 
頭 ア ドレ ス を 示す . 頭 ア ドレ ス を 示す . 各 ド ライ ブ が 
独立 し て 持つ . 


Figure-1.1.4 1 つの ドラ イブ プ の ディ スク ・ パ ラメ ー タ ・ ヘ ッ ダ の 構成 


上 図 で , ( ) 内 は , Figure-1.1.2 の CBIOS の リス ト の “DISK00" の 場合 の シン ボル 名 で す . この 場 
合 の 実 ア ドレ ス が , リス ト 左 側 に 示さ れ て いま す の で , 実際 の トラフ ンス レー ト ・ テ ー ブ ル (TRANS : ) 
や 。 リ スト 最後 の "SCRATCH RAM AREA”" と を 対比 し て 下さ い . 
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図 中 の 小文字 の n は , デ ィ ス ク No. を 示し ます が , 同一 機種 の ドラ イブ を 使用 する の で あれ ば ,*XLT ィ ? 
と DPB" は 1 つの も の を 全部 の ドラ イブ で 共用 する こと が で きま す (CBIOS の リス ト で は 。, 共用 し 
て そい る)。- だ だし, CSV"。 ALV" に つい て は 完全 に 独立 し て いな けれ ば な り ま せん . 

ディ スク ・ ド ライ ブ を 1 個 使用 する シス テム で は , Figure-1.1.4 の ディ スク ・ パ ラメ ー タ ・ ヘ ッ ダ 
を , 次 の 図 に 示す よう に , それ ぞ れ の ドラ イブ に 対応 し て n 個 設け ます . 


DPBASE : (DPH の テー ブル の 先頭 に は , この ラベ ル が 付い て いる ) 


ドラ イブ ロー | 
(n の 最大 は I6=P: ) 


図 中 で ,( ) の つい て な い シ ン ボ ル の 呼び 方 は , 後述 の DISKDEF マク ロ ・ ラ イブ ラリ で 用 いら れ て いる も の で あ り , ( ) の 中 の 
呼び 方 は , Figure-|.1.2 の CBIOS の リス ト で の も の で ある . 

CBIOS の リス ト で は , 4 つの 同一 ドラ イブ を 使用 する た め , ^TRANS′ と ^DPBLK” は . それ ぞ れ | つ 設 ける だ け で , すべ 
て の ドラ イプ で 共用 し て いる . 


FIgure-1.1.5  n 個 の ディ スク ・ ド ライ ブ を 持っ た シス テム の ディ スク ・ パ ラメ ー タ ・ ヘッ ダ 


生 ) この ディ スク ・ パ ラメ ー タ ・ ヘ ッ ダ は 。 後述 の "DISKDEF” マク ロ ・ ラ イブ ラリ に よ り , 自動 
的 に 作成 で きま す . 


セク タ ・ ト ラン スレ ー ト ・ ベ クト ル 

同心 円 状 の 各 ト ラッ ク の セク タ を , 少し で も 速く 読み 書き する た め の 手 法 と し て , パス キュ ー? が あ 
り ま す . スキ ュー は , セク タ の 飛び 越し 読み 書き の こと で あり . 普通 に アク セス する 場合 は , 同一 ト 
フッ ク 上 の セク タ を , ディ スク 1 回 転 に つき 1 セク タ し か リー ドラ イト で き な い と ころ , セク タ 番 
写 に この スキ ュー を 持た せる こと に より , 数 セク タ の リー ドン ライ ト を 可能 に する も の で す . 

この “スキュー” の 概念 を 次 の 図 で 示し ます . 


CPM の 内 部 構造 ご 機能 の 詳細 


スキ ュー・ フ ァ ク タ の な い デ ィ ス ク の 
リー ド ・ オ ペレ ーション 


< ユマ 


ファ クタ 6 の 標準 8 インチ ディ スク の 
リー ド ・ オ ペレ ーション 


フィ ジ カ ル ・ セ クタ 25 を リー ド 


| を 外 m ト 


処理 中 


役 交 を) 
デー タ 処 理 中 


処理 終了 . 
炊 の セク タ の 
リー ド 可 能 


処理 終了 . 
次 の セク タ の 
リー ド 可 能 


本 全 a の の デ ー ン を を リー トド. 
0 ルク サー1 生 陸 


この 期間 は , リー ド さ れ た 1 セクタ 分 の 
デー タ が, RAM 内 の 転送 な ど , コン ビュ 
ー タ の 内 部 処理 を 受け て いる . 


(ロジ カル ・ セ クタ 5 ) 
たる を の 人 ド 、 
セク タ | の デー タ の 


フィ ジ カ ル ・ セ クタ | を リー ド . 
(ロジ カル ・ セ クタ | ) 


ーー フィ ジ カ ル ・ セ ク 
タ 7 を リー ド . 
(ロジ カル ・ セ クタ 2 ) 


・ で 寸 び っ 


レーー フ ィ ジ カル ・ セ クタ 13 を リー ド 


(ロジ カル ・ セ クタ 3 ) 


. テ ーー らら ず 人 は き 
で すべ 口 ) 


( ぉ ょ 層 Y・ 


Figure-1.1.6 スキ ュー の 概念 


上 図 は 。 スキュー の な り い 場合 と , ある 場合 の , ディ スク 上 の 1 つの トラ ッ ク を リー ド す る 際 の 模式 


図 で す . 
まず , スキ ュー の な いり 場合, セク タ を 1。 2, 3 


ーー の よう に 順番 に 読み 出す こと を 考え て み ま し ょ 


ぅ 実際 の ディ スク の アク セス は , この よう な セク タ を 順番 に 連続 し て リー ド プ ライ ト す る 場合 ( シ 
ー ケ ン シ ャ ル ・ フ ァイル ) が 多い の で す . 現実 は , ディ スク が 回 転 す る の で す が , 図 で は 便宜 上 , へ 
ッ ド が ディ スク の 回 り を 回 転 し な が ら 読 み 出す よう に 説明 され て いま す . 

図 に 示さ きれ て いる よう に , ディ スク が 回 転 し . リー ド プ ライ ト ・ ヘ ッ ド の 下 に セク タ 1 が 来 た 時 に , 
セク タ 1 の デー タ が 読み 出さ れ ま し た . その デー タ を , 所 定 の メモ リ に 格納 し , 次 の セク タ で ある セ 
クタ 2 を 読み 出す 準備 が 整っ た 時 に は , すでに セク タ 2 は, ヘッ ド の 下 を 通り 過ぎ て し まっ て いま す . 
ディ スク が 1 回 転 す る の を 待た な けれ ば , セク タ 2 を み な 出す 4k1 お を きま 寺 ん 、 や まり 。 みみ 和 ー 
が な けれ ば セクタ を 連続 し て 読む 場合 は ,、 ディ スク 1 回 転 に つき 1 セクタ し か リー ド で き な を な いとい 


うこ を を 小 上 で v* ま すす.。 
次 に , 


スキ ュー・ フ ァ ク タ 6 を 持つ , 8 イン チ 片 面 単 密度 の 標準 フロ ッ ピ ー・ デ ィ ス ク の 場合 を 考 


ぇ > て み ま し ょ う . セク タ 変 換 テ ー ブ ル の 実際 は , Figure-1.1.2 の じ BIOS の リス ト に も 示さ れ て いま す が , 


CP ノ /M が , 標準 ディ スク の ロジ カル ・ セ クタ (論理 セク タ ) を 1, 2, 3, 
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の と 順番 に 読む と いう こと は , 


BIOS( 量 本 入出 カシ ステ ム の ) 


実際 に は , フィ ジ カ ル ・ セ クタ (物理 セク タ ) を , 7, 13。 19。 “の と 読み 出す こと に な る の で す . 

さて , この 場合 の リー ド ・ オ ペレ ーション の 様子 が Figure-1.1.6 に 図示 され て いま す が , この よう 
に ディ スク 1 回転 に , ロジ カル * セ グ クタ 1 2。 3.)4。 5 の 計 5 セ クタ が 読み 出さ れ て いま す . 先程 の 、 
スキ ュー が な い 場 合 の 5 倍 の 速 さ で ディ スク を アク セス で きる 訳 で す 。 図 で は "リード? に 対し て 述 
べ て いま す が , ライト” の 場合 も 全く 同様 に これ ら の こと が 言え ます . 

以上 で , “スキ ュー"” の 概念 は 理解 され た と 思い ます .。 そし て 標準 ゲ ィ スズ ク の よう に 『 次 キ ェ ュー バタ 
ァ ク タ を 持っ た 場合 に 必要 と な る も の が , 本 題 で ある 「 セ クタ ・ ト ラン スレ ー ト ・ ベ ベクトル 」 で ある 
訳 で す . 

8 イン ナ 標 準 デ ヂ ディス ク の セク タ 変 換 テ ー ブ ル は , Figure-1.1.2 の CBIOS の リス ト に , その 実際 の も 
の が 示さ れ て いま す が , ロジ カル ・ セ クタ と フィ ジ カ ル ・ セ クタ は 次 の よう に 対応 し て いま す 。 


実際 の 物理 的 セク タ 番 号 (フィ ジ カ ル ・ セ クタ 番号 ) 


(標準 ディ スク は , | トラ ッ ク が 26 セ クタ で ある ) 


CPZM 上 の 論理 的 セク タ 番 号 (ロジ カル ・ セ クタ 番号 ) 
円 環 に つなが っ て いる 


Figure-1.1.7 8 イン チ 標 準 デ ィ ス ク の ロジ カル ・ セ クタ 呼 フィ ジ カ ル ・ セ クタ の 対応 


7 ア ィ スク の リー ド ノ ラ イト を 行う 時 , その 管理 者 で ある BDOS は ,、 ロジ カル ・ セ クタ 番号 を CBIOS 
に 与え , その フィ ジ カ ル ・ セ クタ 番号 を “SECTRAN′ サブ ルー チン で 計算 きせ ます . そこ で 得 ら れ 
だ ワイ ジ カ ル ・ セ クタ 番号 を , “SETSEC” サ プ ル ー チ ン で 指定 し て , “READ? や "WRITE を 実行 
させ る 訳 で す . 

生 ) この セク タネ ェ ト スン スレ シート ・ べ トル は 。 る スキ ュー エ ・ フ タタ を 指定 よる こ と 本 まり の 系 述 

の “DISKDEF” マク ロ ・ ラ イブ ラリ に より , 自動 的 に 作成 され ます . 

スキ ュー の な い デ ィ ス ク は すべ て アク セス が 遅い と いう 訳 で は あり ませ ん . ハー ドウ ェ ア で ス 
キュ ー を 持た な せ て いる も の や , ブロック リー ドン テル ト (ディ スク 則 転 に 1 トラック の 会 
部 の デー タ を リー ドブ プラ イト する も の ) を 行っ て 高速 化 を 計る こと も で きま す . 


ディ スク ・ パ ラメ ー タ ・ プ ブロ ッ ク 

ディ スク ッッ パ ラメ ー タ ・ ブ ロッ ク (DPB) は , Figure-1.1.2 の CBIOS の リス ト で は 。 ラ ベル \DPBLK。 
で 始ま る 一 連 の テー ブル で あり , ディ スク ・ パ ラメ ー タ ・ ヘ ッ ダ の DPBn/ (Figure-1.1.2 の リス ト 
で は “DPBLK”) に よっ て , その ブロ ッ ク の 先頭 が アド レス され て いま す . 


じ ピ デイ M の 内 部 構造 機能 の 詳細 


DPB は , BDOS が ディ スク 管理 を する の に 必要 な , 各 ド ライ ブ の ハー ドウ ェ ア 的 な 情報 の すべ て を 
の お りく キネ が ダ ィ 半 電 の チッ 0 イス アミ | 導 析 に ハー ドー ポポ ィ スズ スク まま べべ で の と ティ 
プ ブ は , この DPB に よっ て その 諸 元 が 定義 され , BDOS に 管理 され ます . 

Figure-1.1.2 の CBIOS の リス ト では, 4 つの ドラ イブ が 同一 の 機種 で ある た め , 1 つの DPB を 共用 
し て いま す . し か し , CPM は, 1 つの シス テム で , 機種 の 異な る ディ スク ・ ド ライ ブ を 自由 に 組み 
合わ せ て 使用 する こと が で きま す . 

例え ば , ド ライ ブ A : が ミニ の 両面 ドラ イブ , ド ライ ブ B : が ミニ の 片面 ドラ イブ と な る シス テム ( こ 
の よう な シス テム は , 両 面 一 片面 の ファ イル 変換 が , PIP コ マン ド で 自由 に で きる ) と か , ドラ イブ A・, 
B: が 8 イン チ の 両面 で (た だ し , 8 イン ナチ の 片面 単 密 デ ィ ス ケッ ト を な ト し た 場合 は , 自動 判別 し 
て その ドラ イズ ほな を イッ た 齋 瑞 ご じ で 動作 する よ け うに じ で お て く : ど よい 9 お ドラ テキ ネプ FE・. FR が ミニ 
の 画面 と いう よう に , それ ぞ れ の ドラ イプ に 専用 の DPB を 設け る こと に より , この よう な 凌 な っ だ た F 
の の ジス テム 補 使 用 する と こと が で きま す , 

次 に 。 ディ スク ・ パ パラ メー タ ・ ブ ロッ ク の 各 フ ィ ー ル ド に つい て , Eigure-1.1.2 の 標準 ディ スク の 
CBIOS を 例 に 説明 し まし ょ う . 


DPBLK : ( 園 は 1i バイト, 国 軒 は 2 バイ ト の エリ ア を 示す . 記入 され て いる 数 値 は 8 イン チ 標 準 デ ィ ス ク の も の ) 


(の) 
や 
は 


「m 
と 
に 


Sectors Per Track.、 | トラ ッ ク あ た り の 全 ロ ジ カ ル ・ セ クタ 数 (|28 バ イト を | セク タ と する ). 


Block SHift factor.。 デー タ ア ロケ ーション ・ ブ ロッ クシ フト の ファ クタ で デー タ ・ ブ ロッ ク ・ ア ロケ ー 
ショ ン サ イズ に よっ て 決め られ る . 数 値 "3′ の 意味 は , 1024 ニ 128X 2? の “3 乗 の こと . 


le 
の 
こ に 


BLock Mask。 ブロ ッ ク ・ マ スク の こと で , デー タ ・ ブ ロッ ク の アロ ケー ショ ン ・ サ イズ に よっ て 決め ら 
れる . 数 値 "7 の 意味 は , 0 一 7 の 8 セク タテ I024 バ イト で 1| ブ ロッ ク を 示す . 

EXtent Mask、。 データ ・ ブ ロッ ク の アロ ケー ショ ン ・ サ イズ と , ディ スク ・ プ ロック 数 に よっ て 決め られ る 
の 


Eo Disk Size Max. ディ スク の デー タ ・ ブ ロッ ク の 最大 数 一 | . 数 値 "242 の 意味 は , 
1(128 バ イト メメ 26 セ クタ ) メ (77 本 一 2 本 )/1024 バ イト 一 | 三 242( 余 り は 切り し 25 


DiRectory entries Max. ディ スク に 収容 可能 な ディ レク トリ ・ エ ント リ の 数 一 |. 
次 の ALO0 と ALI は この ディ レク トリ ・ ブ ロッ ク に よっ て 決め られ る . 


SO 電 に 人 - 
EICIIIILIGI ーAL0 ニ 192 三 CO0H,。 ALIl= ニ 0 を セッ ト し た ビッ ト ・ パ ター ン . 


00 
各 ビ ピッ ト は , に し ン 導 けり 使用 する デー タ ・ ブ ロッ ク を 示す . この 例 で は , 2 つの ビッ ト が 


Il な の で , 2 つの デー タ ・ ブ ロッ ク = テ 2K バ イト が ディ レク トリ ・ エ リア と し て 使用 され る こと を 示し て いる 


アア 
「 


ChecK vector Size. ディ レク トリ を チェ ッ ク す る ベク トル の サイ ズ . 
CKS 三 (DRM 十 | ) プ 4. た だ し , ハー ド ・ デ ィ ス ク の よう な メデ ィ ア を 交換 し な いも の は 0 と な る 。 


track OFFset. シス テム ・ ト ラッ ク を スキ ッ プ する た め の オ フ セ ッ ト 値 . ある い は , 大 容量 の ハー ド ・ デ ィ 
スク を, 複数 の ドラ イブ に 分 割 す る 場合 に も 利用 で きる . 数 値 “2′" は , シス テム ・ ト ラッ ク が 2 本 で あ 
る こと を 示す . 


〇 の 
で 


て う 
と 
の 


ど 46) 


BIO ど (基本 入出 カシ ステ ム ) 


この DPB の 各 パ パラ メー タ 間 の 関係 を 次 に 示し ます . 


| ,042 を 
Z,048 15 


に 収容 可能 な 
リ ・ エ ント リ 総 数 


4 .036 3| 
8 ,192 


16 ,384 16 ,384 


Figure-1.1.8-1 Figure-1 .1.8-2 Figure-1.1.8-3 


注 ) これ ら の ディ スク ・ パ パラメータ ・ ブ ロッ ク は 。, 後述 の ま 枯 5 抽 ER タク ロッ ラキ ザラ 9 コ ェ 上 福 。 
目 動 的 に 作成 する こと が で きま す . 


1.1.3 DISKDEF マク ロ ・ ラ イブ ラリ の 使い 方 


_ 前 項 1.1.2 で 述べ た 3 つの 部 分 か ら 成 る ディ スク ・ パ ラメ ー タ ・ テ ー ブ ル と , CBIOS 最 後部 の スク ラ 
ッ チ RAM エ リア は , 標準 CP/M の ディ スケ ッ ト に 含ま れ て いる ファ イル , "DISKDEE. LIB/ (ディ ス 
グ の ナオ フ プア: 年 ア テ きき ょ 須 生 包 表 よ ) を , こ 浴 英 ル . よ サー 村 の セク ロペ ベア セン ダラ の MAC* 
で アセ ンプ ブル する こと に より , 自動 的 に 作成 する こと が で きま す . 
"MAC” に つい て は , 3.1 章 を 参照 し て 下さ い . 
DISKDEF マ クロ は , 一 般 的 に , CBIOS の 中 の 次 に 示す 位置 に 置か れ ま す . 


CBIOS TOP 
MACLIB DISKDEFLIB------ "DISKDEF* マ クロ ・ ラ イブ ラリ の 使用 を 宣言 . 


JUMP ベク トル 


DISKS | n 個 の ドラ イブ を 持つ シス テム を 作成 する . 
DISKDEF 0… ーー ドラ イブ プ A さ を 圧 還 す ずる)…* は そ ー。 ラメ ー タ . 
DISKDEF | EEE ドラ イブ B : を 定義 する . 

DISKDEF 2… ーーーーー ドラ イブ C : を 定義 する . 

DISKDEFnー|… 最終 ドラ イブ を 定義 する . 


BOOT お よび 各種 |!0 ル ー チ ン 


(: ス クラ ッ チ RAM エ リア ) 
ENDEF--- --- クラッチ ・ エ リプ を ここ 太 置 ぐ 、 


CBIOS END 


Figure-1.1.9 DISKDEF マ クロ の 位置 
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CP ン M の 内 部 構造 機能 の 詳細 


次 に 。DISKDEF マ クロ ・ ラ イブ ラリ を 使っ て , 8 イン チ ナチ 標 準 デ ィ スク の 場合 と ,。 5 イン チ の ミニ 両 
面 デ ィ ス ク の 場合 に つい て , 実際 に パラ メー タ を 設定 し て アセ ン ブ ル を 行い 、。 デ ィ ス クッ パフ メー タ ・ 
テー ブル な ど を 自動 的 に 作成 し て み ま し ょ う . 「 


8 イン チ 片 面 単 密度 の 標準 ディ スク の 場合 
この ディ スク の 物理 的 パフ メー タ は , 


128 バ イト ノ 1 セク タ 
26 セ クタ 1 トラ ッ ク 
7 上 トラッ ツク グル ディ ベク 


で あり 。 標準 ディ スク の シス テム ・ デ ィ ス ク は は , 


2 本 の シス テム ・ ト フッ ク 
64 の ディ レク トリ ・ エ ント リ 数 


と な っ て いま す の で , これ ら か ら , DISKDEF の 各 パ ラメ ー タ を 決定 し ます . ' 

アセ ン ブ ル す る た め の ソ ー ス ・ フ ァイル は , 本 来 な ら ば , CBIOS 全 体 で ある 訳 で す が , ここ で は , 
DISKDEF マ クロ ・ ラ イブ ラリ の み に 注 目 し て も ら う た め , DISKDEF マ クロ の み の ソ ー ス ・ フ ァイル 
を 作り まし た . その アド レス は 。, Figure-1.1.2 の CBIOS の リス ト と 一 致す る よう に , ORG で 指定 し て 
あり ます . 

その ソー ス ・ リ スト (ファ イル 名 8INCH1S . ASM) を 次 に 示し ます . 

この ソー ス ・ フ ァイル を ,。 マク ロ ・ ア セン ブラ の MAC” で アセ ン ブ ル し , その 結果 , ディ スク ・ 
パパ * ラ メー タ ・ テ ー ブ ル な ど が , どの よう に 展開 され る か , 生成 され た PRN フ ァイル を 見 て みる こと に 
し まし ょ う (MAC に よる アセ ン ブ ル は , 3. 1 章 を 参照 ). 


の 5\\ 


その 前 に , 上 記 ソ ー ス ・ フ ァイル 中 の DISKDEF パ パラ メー タ の 意味 を 次 に 示し て お きま す . 


dn … ロ ジ カ ル ・ デ ィ ス ク No. 通 常 は 。0 三 AA 。 1 ユニ B に > 15 ニ PD: で ある . 

fsc … 各 トラ ッ ク の 最初 の セク タ No. 0 ある い は 1 で ある . 

lsc … 各 トラ ッ ク の 最後 の セク タ No. 

skf … セ クタ の 飛び 越し 読み 書き の スキ ュー・ フ ァ ク タ . スキ ュー を か け な い 場合 は , これ を 省 
略す る . 

bls …1 デ ー タ ・ ブ ロッ ク の サイ ズ (バイ ト 数 )。 Figure-1.1.12 参 照 . 

dks … シ ステ ム ・ ト ラッ ク を 除く ディ スク の 全容 量 を , bls 単 位 で 表し た も の . 

dir … デ ィ レ クト リ ・ エ ント リ の 数 . 


ンク 


Cks 


OfS … 


ーーーーーーーーーー ーー ーー ーー Sm KR 3 PS 


ン 
/ 


向う 


坦 


A>TYPE 日 INCH18. AS / “ | 


8 ヘー 


BIOS( 基 本 入出 カシ ステ ム ) 


… 書 き 込 み 前 た ログ イン され て か ら デ ィ ス ケッ ト が 変換 され て いな いか を チェ ッ ク す る ディ 


レク トリ ・ エ ント リ の 数 。 フ ロッ ピー・ デ ィ ス ネス ク の よう に , メデ ィ ォ ア が 変 挫 で きる も の は 
dir と 同じ 値 . ハー ド ・ デ ィ ス ク の よう に 変換 し な いも の は 0 を セッ ト す る (チェ ッ ク 不 要 ). 
ンス テム ・ ト ラッ ク を 確 介 する た め の オ フ セ ッ ト 数 . 通常 は , 使用 する シス テム ・ ト ラッ 
ク の 本 数 を セッ ト す る . ハー ド ・ デ ィ ス ク の 場合 は , ドラ イブ 単位 に 分 割 す る の に も 利用 
され る . 


3 キオ ボ ポ ボ ポ ポポ ボネ 日 InCh Gin ロ le S1ded 本 玉 束 


MaCLIB DISEDEF| DSKDEF マ プロ ・ ラ イブ プラ リ の 使用 を 宣言 . 
ORG OBA さ さ H (Figure 一 1.1.2 の リス ト と 同じ アド レス に する ため. ) 


[DISEG 4]-. 4 ドラ イブ の シス テム を 作成 


dn ISC DIS diF OfS 


DISEDEF 0O。 1。26。6。 1024。24 さ 。 64。 64 。 2 


+SC SKf dKS CKS 


回 - ディ スク 1.2.3 を , ディ ス フ 0 と 同じ パラ メー マ に 
設定 する . この 記述 の , 一 般 形 は *n,」? で あり , n 
番目 の ディ ス フ を , 」 番 目 と 同じ パラ メー マタ に 設定 
する 場合 に 使用 する . 共用 可能 な テー プル は 共用 
: され る の で , メモ リ の 節約 に な る . 


SCRATCH RAM AREA FOR BDOS USE | 
ORG QBCFOH (Figure 一 1.1.2 の リス ト と 同じ アド レス に する だ め ). 
ENDEF」 - スク フラ ツチ RAM エ リア を ここ に 設け る 。 


END | 


FIgure-1.1.10 標準 ディ スク 用 の ディ スク ・ パ ラメ ー タ ・ テ ー ブ ル を , \DISKDEF′ マク ロ ・ フ コ , ア 


リ で 実験 的 に 作成 する た め の ソ ー ス ・ フ ァイル . 


以上 9 個 の パラ メー タ を , Figure-1.1.10 に 示さ れ て いる よう に 標準 ディ スク の 場合 の 値 に セッ ト し 
て , DISKDEF の マク ロ ・ コ ー ル を 行い ます . 

MAC に よる アセ ンプ ブル 後 の PRN フ ァイル を 次 に 示し ます . 展開 され た 4 つの 部 分 を , Figure-1.1. 
2 の CBIOS の リス ト と 照合 し て みて 下さ い . 
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CPM の 内 部 構造 と 機能 の 詳細 


QA>TYPE BINCH18S.FRN / 


FE1 す 11177991 ロロ INCH SINGLE SBIDED ルルル まま ポ 束 


MACLIB DISREDEF 
BA ささ DRG OBA さ さ H 
DiISES 4 
BA ささ += DF'BASE 1 s BASE OF DISK PQRAMETER BLUCKS 
BA ささ + 昌 2BAOOOO | DPEOs Du XLTO。OOOOH 3 TRANSLATE TABLE 
BA さ 7+OQOOOQQQO DM OOQOOH。 OOOQH 3 SCRATCH AREA 
| BA さ B+FOBC7 さ BA Du DIRBUF 。 DPBO sDIR BUFF。PARM BLOCK 
| BA さ SF+BFBD7QBD DM CSVO , QALVO s CHECE 。 ALLUC VECTORS 
| BA4 さ +8 ヨ 2BAOOOO | DPE1: Du XLT1 。OOOOH 3 TRANSLATE TABLE 
| EQA47+OQOOOQQQO Du OQOQH。 OQOQH sSCRATCH AREA 
| BA4B+FOBC7 さ BA DM DIRBUF 。 DPB1 sDIR BUFF。PARM BLOCK 
| BA4F+BEBD9FBD DM CSV1 。 ALV1 3s CHECK。 QLLOC VECTORS 
| BA5 さ + 昌 2BAOOOO | DFE2: DM XLT2。OOQOOH sTRANSLATE TABLE 
| BA57+QOQQOQQQQQO DM QQQQH。 OQQQH 5 SCRATCH AREA 
BASB+FOBC7 さ BA DM DIRBUF 。 DPB2 sjDIR BUFF。PARM BLOCK 
BASF+EDBDCEBD DM CSV2 。 ALV2 5sCHECK。 QALLDC VECTORS 
BA6 さ + 日 2BAOOOO | DPES: DM XLT さ 。OQQOQOH 8TRANSLATE TABLE 
BA67+QOOQOQOQQQ Du QOQQH。 QQOQOH 3 SCRATCH QREA 
BA6B+FOBC7 さ BA DIRBUF 。 DPB さ 3DIR BUFF。PARM BLUCK: 
BA6F+1CBEFDBD CSV さ 。 ALV さ CHECK 。 ALLODC VECTORS 
DISKDEF O。1。26。6。1024 。24 さ 。64 。64。2 
」、 BA7 さ += sDISK PQRM BLOCK 
BA7 さ + 1 AOO 3 SEC PER TRACK 
BA75+Q さ sBLOCK SHIFT 
BA76+O フ 7 5sBLOCK MASE: 
| BA77+OO sEXTNT MASK 
| BA7 ヨ +F2OO sDISK 5S1ZE-1 
BA7A+ さ FQO sDIRECTORY MAX 
BA7C+CO s ALLUCO 
BA7D+OO saLLOC1 
BA7E+1OQOQ s CHECK 81ZE 
BABQ+OQO2QO s DFFSET 5 
BQB2+= 8sTRANSLATE TABLE 
BAQB2+Q 1 
BAB さ + 〇 7 
| BAB4+OQD 
BAB5+ 1 マ 
BAQB6+19 
BA フフ +Q い 5 
BAQBB+OB 
BAQB9+ 1 1 
| BAQBA+ 1 7 
BABB+Q ミ 
BABC+Q9 
BAQBD+OF 
BABE+15 
| BABF+O2 
BAQ9O+Q 晶 
BA91+OE 
| BA ワ 2 つ +14 
| BA9 さ + 1 
BA94+O6 


クノ 


ぬこ と グ ・ ウ の ウー テニ ・ い 22 ユ d 


・ コ 1 


和 ops 
| の 


いこ 口 1・ の ーー テコ 


ご 7 の 2 工 浴 の 人 S 


BI 〇 (基本 入出 カシ ステ ム ) 


BA95+QC | 
BA96+ 12 | 
BQ97+ 1 日 
BA98+O4 | 
BA99+0a | 
BA9A+1O0 | 
BA9B+ 16 | 
DISKDEF 1.O | 
BA7 ミ += DPB1 EQU DPBo 3 EDUIVALENT PARAHETERS | 
OO1F+= AL 1 EQU ALSQ 5 SAME ALLODCATION VECTOR 8IZE | 
OO10+= CSS1 EQU CS8SO 3 SAME CHECKSUM _ VECTOR 1ZE | 
BA 昌 2+= XLT1 EQU XLTO 5 SAME TRANSLATE TABLE | 
DISk:DEF 2,O 
BA7 フ 7 さ += DPB2 EQU DPBO EDUIVALENT PARAMETERG 
OO1F+= ALS2 EQU ALGSQ 5 SAMNE ALLUCATIDN VECTOR 8IZE | 
OO10+= CSS2 EQU CSSQ SAME CHECKSUM VECTOR 1IZE | 
BAB フ += XLT2 EQU XLTO 3 SAME TRANSLATE TABLE 
DISkDEF さ 。O 
BA フエ += DPB う EQU DPFBO 5 EDUIVALENT PARAMETERG 
OO1F+= AL さ EQU ALSO SQME ALLOCATIODN VECTOR 81IZE | 
OO 10+= CS8 さ EQU CSSO 3 SAME CHECKSUM _ VECTOR 1IZE | 
BAB2+= XLT さ EQU XLTQ 3 SAME TRANSLATE TABLE | 
5 | 
H 
5 円 
ーーー ツー ーーー ン ーー ーーー ニー ニー ee 
: SCRATCH RAM AREA FDR BDDS USE 
BCFO ORG OBCFOH | 
ENDEF - 
BCFO+= BEGBDAT EQU ま 
BCFQ+ DIRBUF: DS 12 iDIRECTURY ACCESS BUFFER の 
BD70+ 人 ALVOs DS さ 1 5 
BDBF+ CSVO: DS 16 ツ 
BD9F+ ALV1 : DS 1 っ 
| BDBE+ CSV1 : DS 16 へ 
BDCE+ ALV2』 DS さ 1 M | 
BDED+ CSV2』 DS 16 上 
BDFD+ ALV さ 』 DS る 1 | 
BE 1 じ + CSV さ 』 | 
BE2 ビ += ENDDAT EQU 
O1 さ じ += DATSIZ EQU ま ーBEGDAT 
| 
BE2C END | 
き ン 
Figure-1 .1.11 DISKDEF マ クロ ・ ラ イブ ラリ に よ ょ よ り , 自動 的 に 作成 され た 標準 ディ スク の ディ スク ・ ノ パ \ 


デン チャ テー デル 


この よう に , Figur-1.1.2 の リス ト と は , ラベ ル の 名 称 や 配置 が 異な る も の の , ディ スク フン パラ メー 
クタ ・ テ ー ブ ル の 内 容 は 全く 一 致し て いる こと が 分 か り ま す . 


ン ら 


CPM の 内 部 構造 と 機能 の 詳細 


5 イン チ の 両面 ディ スク の 場合 

5 インチ の 両面 ディ スク に つい て , 先程 と 同様 に だ ィ ス ク ・ パ ラメ ー タ ・ テ ー ブ ル を 作成 し て み ま 
0 

ミニ の 両面 ディス ク ・ ド ライ ブ の 物理 的 な 庄 元 は , 次 の よう な も の と し ます . 


9250 パイ ト / 1 クタ 
32 セ クタ 1] トラッ ク (サイ ド 0 , サイ ド 1 の 両面 で ) 
示 ト ラン ッ ンタ ププ ヤ デュ スズ 


この ディ スク に は , スキュー” を か け な い こと に し ます . そし て , DISKDEF パ ラメ ー タ の デー タ ・ 
プロ ッ ク の サイ ズ bb′ 反 2 氏 バイ ギ 下 左 し て 2048, bls 単 位 で 表し た ディ スク の 全容 量 “dks” は 152, 
ディ レク トリ ・ エ ント リ の 数 “dir′ と *cks” は 128 と し ます . 1 トラ ッ ク 当 り の ロジ カル ・ セ クタ 数 
Ysc” は 。 32x256 プ 128=64 と な り ま す . オフ セッ ト 数 “ofS" は 前 回 と 同じ 2 と し ます . 
で は 。 前 回 の Figure-1.1.10 の ソー ス ・ リ スト と 同じ も の に , 上 記 の パラ メー タ を セッ ト し た も の を 
次 に 示し ます . ファ イル 名 は “MINI2W . ASM” で す . 


Q:TYPE MINI2M. QBH / 


) キネ ポポ ネル ネネ ポ MM1n1 DOuD16G お 1 水玉 涼 ボ 氷 束 涼 束 東 束 


[MACLIB DISKDEF| 
ORG OBA さ 3H 

スキ ュー を か け な い の で スキ ッ プ 
し て いる こと に 注意 . 

/ 


IDISEDEF_1,Gi 
DISEDEF_ ヶ 』C 
IDISKDEF_ 3,0| 


H GCRQACH RAM AREA FOR BDOS UBSE 
DRG QBCFQH 
END 
> 
Figure-1.1.12 ミニ の 商 面 アディ ネタ 用 の プロ スク ター パテ メー タ ・ テ ー プ 示 夫 SRDER" マク ロー ラテ 


イブ ラリ で 実験 的 に 作成 する た め の ソ ー ス ・ フ ァイル . 


ど 42) 


BIOS( 基 本 入出 カシ ステ ム ) 


これ を MAC を 使っ て アセ ン ブ ル し , 生成 され た PRN フ ァイル を 湊 に 示し ます . 展開 の 状態 を , Figure 
-1.1.11 の も の と 比較 し て 下さ い . 


/ me MINI2M. FRN ) 


1 ホホ ネネ ネネ ネネ ネネ MINI _ DOUBLE BIDED ホネ ネネ ネネ ボボ 


、 


| 
1 
NACLIB DISEDEF 
BA ささ RG OBA さ さ H 
DISESG 。 4 ー 
BA さ さ += DPBQASE EQU を i BASE DF DISK PARAMETER BLOCRG 
BA ささ +QOOOOOOQO |DPEO』 Du XLTO』 OOOOH 3 TRANSLATE TABLE 
BA さ 7+OQQOOQOoQo Du QOQOH。 OOQOH 3 SCRATCH AREA 
BA さ SB+FOBC7 る BA Du DIRBUF 。 DPBO 5 DIR BUFF,PARH BLOCK | = 
BASF + 日 BD7OBD Du CSVO 。 QLVO 5 CHECK。 ALLOC VECTORS | ク | 
BA4 さ +OOOOOOoOO Du XLT1 。 OOOOH TRANSLATE TAQBLE ハス | 
BA47+OOQOQoOQOOo DM OOOOH。 QQOOH 3 SCRATCH AREA ン 
BA4B+FOBC フ 7 く SBAQ Du DIRBUF 。 DPB1 3 DIR BUFF,PARM BLOCk |/ パ 
BA4F+B6BDA3BD Du CSV1 。 QLV1 5 CHECK。 ALLDC VECT ロ RS | ラ 
BA5 さ +OQOOOOOO Du XLT2。 OOOOH 3 TRANSLATE TABLE / 
BA57+QOQOQOQoo Du QOQQOH。 OQOOH 5s SCRATCH AREA マ 
BA5B+FOBC7 フ BA Du DIRBUF 。 DPB2 3DIR BUFF,PARH BLOCK | へ 
| BASF+E9BDD6BD DMW CSV2 。 LV2 3 CHECK。 ALLDC VECTORS |\ ソ 
| BA6 さ +OOOOOOQOO DM XLT さ 。 OOOOH 5 TRANSLATE TABLE ゲ 
BA67+QOQOOQQQO Du QOQOOH。 QOOQH 3 SERATCH AREA 
BQ6B+FOBC7 さ BA Du DIRBUF 。 DPB さ 3 DIR BUFF。PARM BLOCK: 
RA6F+ 1CBEO9BE Du CSV さ 。 ALV さ 5 CHECK。 ALLODC VECTORS 
DISKDEF O。』1,64。。204 日 。 152。 1 2 日 。 1 2 日 。 2 
BA7 さ += 3DISK PARM BLUCK プ 
BA7 さ +40OO DM 64 3 SEC PER TRACK ス 
BA75+04 DB 4 s BLUCK SHIFT グ 
BN76+OF DB 15 5 BLUCK MASE: ん 
BQ77+O1 DB 1 sEXTNT MASK の 
BA7B+97OO Du 151 3DISK SI1ZE-1 メ 
BA7A+7FOO DM を 8DIRECTUDRY MAX 4 
| BA7C+CO DB 192 3 SLLUCO 
| BA7D+OQQO DB O saLLOC1 
BA7E+2O0OO Du さろ 2 3 CHECK SIZE W 
BQBO+O2OO Du 2 3 DFFSET ク | 
OOOQ+= XLTO EQU O sND XLATE TABLE - セク 変換 ベ フ トル 
が 作ら ね て いな いこ 
DISkDEF 1。O こ に 注意 . 
BA7 さ += DPB1 EQU DPBO 3EDUIVALENT PQRAMETERG 
OO1 ス += ALS1 EQU ALSO 3 SAME ALLODCATIDN VECTOR らら 1ZE 
OO020+= CSS1 EQU CSSO 3 SATE CHECKSUM VECTOR 8IZE 
QOOQ+= XLT1 EQU XLTO 5 SAME TRANSLATE TABLE 
DISKDEF 2。O 
BA7 さ += DF'B2 EQU DF'BQ s EDUIVALENT PARAMETERS 
OO1 さ += ALS2 EQU ALSO 5 SAME ALLUCATIDN VECTOR 51ZE 
OOQO20+= CSS2 EQU CSSO 3SAME CHECKSUM VECTOR BIZE 
OOOO+= XLT2 EQU XLTO 3 SAME TRANSLATE TABLE 
DISkDEF さ ,。O 
BA7 さ += DPB さ EQU DPBO 5 EQUIVALENT PARAMETERGS 
OOQ1 さ += ALS さ EQU ALSQ sSAME ALLDCATIDN VECTOR ら SIZE 
OO20+= CSS さ EQU CSSo 5 SAME CHECKSUM VECTOR 8IZE 
OQOOO+= X し T さ EQU XLTO SAME TRANSLATE TABLE 


ン ア 。 


CPM の 内 部 構造 と 機能 の 詳細 


EQU 


sDIRECTURY ACCESS BUFFER 


Figure-1.1.13 DISKDEF マ クロ ・ ラ イブ ラリ に より , 自動 的 に 作成 され た , ミニ の 両面 ディ スク の ディ 
人 が プー まい ダー プル 。 


今回 は スキ ュー が な いた め , セク タ 変 換 ベ クト ル が 作ら れ て いま せん . また , 先程 の 8 イン ナチ 標準 
ディ スク の も の と , アセ ンプ ブル 結 果 の 各 数 値 が 異な る こと を , よく 比較 し て 下さ い . 


デー タ ・ プ ブロ ッ ク に つい て ] 

ここ で , "デー タ ・ ブ ロッ ク ” に つい て , 解 記 し て お きま し ょ う . 次 に 示す 図 の ⑳ は , 8 イン チ の 標 
準 デ イス ケッ ト の 場合 を 表し , は , ミニ の 両面 ディ スク の 場合 の 一 例 を 表し て いま す . 

1 デー ダテ ロッ グ と は 。、 ド 吉 Gre- 上 1.10 で は DISKDEF パ パラ メー タ の bls” に 当たる も の で あり , 
本 図 人 で は 128 バ イト が 8 個 (8 セク タ ) 連続 し た 計 1024 バ イト = ニ 1K バ イト の ブロック に 当たり ます . 

* デ ー タ ・ ブ ロッ ク ? は , CP ン M が 管理 する ディ スク 上 の ファ イル ・ デ ー タ の 最少 単位 で あり , こ 

れ よ り 小 さい 容量 の ファ イル は 作る こと が で きま せん . 例え ば ⑳ の 場合 は , 1 ペー ジ (256 バ イト ) の 
SAVE を 行っ て も , それ に よっ て 作ら れ た ファ イル は 1K バ イト 長 と な る 訳 で す . 

⑧) の 場合 は , 物理 的 な 1 セク タ で ある 256 バ イト が 8 個 連続 し た 計 2048 バ イト = ニ 2K バ イト の ブロ ッ ク 
が , 1 デー タ ・ ブ ロッ ク で あり , ファ イル の 最少 単位 は 2K バ イト と いう こ を だ な まず 

(0 の 場合 、 シ ステ ム * ト ラッ ク を 除く 全 デ ィ ス ク 容 量 は 。243 デ ー タ ・ ブ ロッ ク で 243K バ イト で あり , 
の 場合 は 。 152 デ ー タ ・ ブ ロッ ク で 304K バ イト で ある こと な ども , 本 図 か ら 理 解 さ れる と 思い ます 


ン ご 


BIOS( 基 本 入出 カシ ステ ム ) 


( A ) ( B) 


8 イン チ 片 面 単 密度 ディ スク の 場合 の デー タ ・ ブ ロッ ク 5 イン チ 両 面 ミ ニ デ ィ ス ク の 場合 の デー タ ・ ブ ロッ ク 
(128 バ イト 1 セク タ , 26 セ クタ ン | ト ラッ ク , 全 77 ト ラッ ク ) (256 バ イト | セクタ, 32 セ クタ ン | トラッ ク , 全 40 ト ラッ ク ) 
ーー 7 
上 トラ ッ ク 20. 1 の 2 本 は .'CP シ M の 李 衝 の プ ブロッ ク トラ ッ ク 0, 1 の 2 本 (一 例 と し て ) は ,| | 最初 の ブロ ッ ク 
外 を : CPM の シス テム ・ ト ラッ ク と し て 
周 システム ・ トラ タッ ク と し て 使用 する . 使用 する 
チ ー この 2 つの ブロ ッ ク 
デ し この 2 つの ブロ ッ ク イィ 時 4K バ イト は , 
ィ 計 2K バ イト は , ス / ディ レク トリ ・ エ リア 
ディ レク トリ ・ エ リア 
全 ーー 
容 この フロ ッ ク か ら 量 この フロ ッ ク か ら 
Fs デー タ ・ レ コー ド ・ を デー タ ・ レ コー ド 
リア 示 0 
な に 補 す E 人 な う 
こ ディ スク 全体 で , ディ スク 容量 ディ スク 例 体 で , ディ スク 容量 
計 243 ブ ロッ ク 243X(1K バ イト ) 計 152 ブ ロッ ク 0 
K バ イト | た ー243K バ イト 2 K バ イト | ブロ ッ ク の も の が に さ eg ト 
243 ブ ロッ ク あ る . めし も 1 9 トラ 
ク を 除く クン 
ッ ク を 除く ) 
デ ディ スク 
| 内 周 | 
ク 
' 1 K ブ ロッ ク 未 満 の 余り . 使用 せ ず も 
還 ッ ク 未 満 の 余り 最終 ブロック ] 
最終 ブロック 


(128 バ イト X26 セ クタ )X(77 本 一 2 本 ) 0 (256 バ イト X32 セ クタ )X(40 本 一 2 本) _ 1 
I024 バ イト (= | データ ・ ブ ロッ ク ) “フロック 2048 バ イト (= 1 データ ・ ブ ロッ ク ) デフ ロッ ク 


1 
(余り は 切り す て る ) 
Figure-1.1.14 デー タ ・ ブ ロッ ク 


デー タ ・ ブ ロッ ク は , CP ン M が 管理 する ディ スク 上 の ファ イル の 最少 単位 で あり , 各 フ ァイル の デ 
ィ ス ク 上 の アロ ケー ショ ン は , 各 フ ァイル を 構成 し て いる デー タ ・ プ ロッ ク す べ て に つい て , ディ ス 
ク 上 の どこ に 散在 し て いる か を , 常に ディ レク トリ ・ エ リア に 記録 する こと に より 管理 され て いま す . 

ディ スク 上 の 物理 的 に 隣り 合う デー タ ・ ブ ロッ ク が , 1 つの ファ イル の 連続 で ある と は 限ら ず 。 別 
の ファ イル の 一 部 で あっ た りす る 訳 で す が , 1 つの デー タ ・ ブ ロッ ク の 中 で は , シー ケン シャ ル ・ フ 
ァイル で あれ ば 連続 し て いま す . つま り 1 データ ・ ブ ロッ ク が 2K バ イト で あれ ば , 2K バ イト 分 の デー 
タ の 内 部 は ディ スク の ロジ カル ・ セ クタ 上 で 連続 し て いる 訳 で す . 

この “データ ・ プ ロッ ク ” は , CPZM の ディ スク 入出 力 の すべ て の 基 に な る も の で あり 。 よ < 理解 
し て お く 〈 心 要 が あり ます . 
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1.1.4 セク タ ・ プ ロッ キン デブ プロ ッ キ ング の 概念 


8 インチ 片 面 単 密度 の 標準 ディ スク は , 物理 的 な 1 セク タ が 128 バ イト で あり, CPM の BDOS が 披 
う ロ ジ カ ル ・ セ クタ の 128 バ イト と 一 致し て お り , BDOS は , 直接 , ディ スク 上 の フィ ジ カ ル ・ セ クタ 
を アク セス する こと が で きま す . と ころ が , ディ スク ・ ド ライ ブ の 種類 は , 3.5 イ ンチ の マイ クロ フロ 
ッ ピ ー・ デ ィ ス ク 。 5 イン チ の ミニ フロ ッ ピ ー・ デ ィ ス ク か ら , 数 10 メ ガバ イト の 容量 を 持つ ハー ド ・ 
ディ スク な ど 様 々 で あり , 記録 密度 や 、 1 セク タ 当 た り の バイ ト 数 な ども 異な り ま す . すべ て の ディ 
スク ・ ド ライ ブ は , デー タ の 読み 書き を , その ドラ イブ 固有 の 1 フィ ジ カ ル ・ セ クタ の 単位 で 行い ま 
す . 例え ば , ディ スク 上 の デー タ の 一 部 を 書き 替え る 場合 , 1 バイト の み の 変 更 で あっ て も , 1 フィ 
ジ カ ル ・ セ クタ を メモ リ 上 に 読み 出し , デー タ の 変更 を 行い 。 つ ディ スク 上 の 元 の セク タ に メモ リ 
上 の 1 フィ ジ カ ル ・ セ クタ の デー タ を 書き 込み ます . つま り , CPM の BDOS は , フィ ジ カ ル ・ セ ク 
タ と ロジ カル ・ セ クタ が 1 対 1 に 対応 する , 1 セク タ が 128 バ イト の ディ スク で な いと , 直接 に ディ ス 
クベ の アク セス は は できない 言う りこ と に みり ます 

し か し , 現在 多く 使わ れ て いる ディ スク は , 1 セク タ が 256 バ イト とか, ハー ド ・ デ ィ スク で あれ ば 
数 K バ イト な どの も の で あり , 1 フィ ジ カ ル ・ セ クタ が 128 バ イト で , 現在 一 般 に 使わ ん れ て いる の は , 
標準 ディ スク ぐら い の も の で し ょ う . そこ で ブロ ッ キ ング , デブ プロ ッ キ ング が 必要 に な っ て くる の で す . 

プロ ッ キ ング,。 デ プロ ッ キ ング は , フィ ジ カ ル ・ セ クタ ロジ カル ・ セ クタ の 変換 アル ゴリ ズム で 
あり , ディ スク ・ ア クセ ス の パフ ォ ー マ ンス に 重要 な 影響 を 与え ます . 

まず ,。 ブロ ッ キ ング , デブ ロッ キン グ の 原理 を 図示 し た も の を 次 に 示し ます . この 例 は , ディ スク 
の フィ ジ カ ル ・ セ クタ が 512 バ イト で あり , OS の ロジ カル ・ セ クタ は , CPM を 想定 し て いる の で 当 
然 128 バ イト の 場合 に つい て 解説 し て いま す . 

プ ブロッキング は , ディ スク へ デー タ を 書き 込む 場合 (OS の 一 般 用 語 で は PUT”) の 手法 で あり , 
デブ ロッ キン グ は その 逆 の 。 デ ィ ス ク か ら デ ー タ を 読み 出す 場合 (GET?) の 手法 の こと を 言い ます . 
そし て これ ら の ルー チン は , BIOS 内 に 設け られ ます . 


まず , デブ ロッキン グ か ら 解 説 し まし ょ う . 


デ プ ブロッキング 

Figure-1.1.15 の 「 デ ブロ ッ キ ング の 原理 」 から, も うす で に 概念 は 把握 され て いる こと と 思い ます 
が , この 図 を 基 に 説明 し まし ょ う . 

- 例えば, “TYPE? コ マン ド な ど で , ディ スク 上 の ファ イル を シー ケン シャ ル に 読み 出す 場合 を 考え 
て 下さ い . 

BDOS は 。 最初 の セク タ (最初 の ロジ カル ・ セ クタ の 128 バ イト ) を ディ スク か ら 読 み 出し た い の で 
す が ,。 ディ スク か ら は 128 バ イト 単位 で は 読み 出す こと は で きま せん . そこ で BIOS は , ロジ カル ・ ぞ 


う 0 


BIOS( 大 本 入 由 カ シス テム ) 


クタ 1 が 含ま れる , ディ スク 上 の フィ ジ カ ル ・ セ クタ 1 を , RAM 上 の ホス ト ・ バ ッ フ ァ に 読み 出し ま 
す . 

ホス ト ・ バ パッ ファ は ,。 1 フィジカル ・ セ クタ の バイ ト 数 の 容量 を 持ち ,。 これ は , 1 ロジ カル ・ セ ク 
タ の バイ ト 数 の 整数 倍 に 当たり ます . 図 の 例 で は , 1 フィ ジ カ ル ・ セ クタ は 512 バ イト で す の で , ホス 
ト ・ バ ッ フ ァ は , 128X 4 =512 バ イト の 容量 を 持っ て いま す . 

ブ ィ イジ カル セク アア 1 の 5 の バイ 上 ト の デー タ は 。 一 諾 の ディ スク ェ ア ク セス で 時 暗 た だし で 小区 ト ・ パ 
ッ フ ァ に 格納 され まし た . BDOS は , さっ そく ホス ト ・ バ ッ フ ァ 内 の ロジ カル ・ セ クタ 1 の 128 バ イト 
の デー タク を 処理 し , 次 の ロジ カル ・ セ クタ 2 の デー タ を 読み 込 も うと し ます . ここ で 重要 な の は , BDOS 
が ロジ カル ・ セ クタ 2 を 読み 込 も うと する 時 に , ディ スク 上 の フィ ジ カ ル ・ セ クタ 1 を 再度 アク セス 
し な いと いう こと で す . 求め る ロジ カル ・ セ クタ 2 は 。 RAM 上 の ホス ト ・ バ パッ プア 計 春 在 し て お り * 
これ を 処理 する 方 が , 再度 ディ スク を アク セス する より ずっ と 速い か ら で す . 


デ プ ロ ッ キン グ の 原理 ブロッキング の 原理 
(ディ スク か ら デ ー タ の 読み 出し ) (ディ スク へ の デー タ の 書き 込み ) 
実際 の ディ スク の トラ ッ ク の 一 部 分 実際 の ディ スク の トラ ッ ク の 一 部 分 


\ーーーーーーー ヘ ーーーーーーー 一 一 ノ 2 
(し 0 結 で ボス トド < が X ッ プア に 学 ト ・ バ ッ フ ァ 全 体 を ディ スク に 格納 . 


/ーーーーーーーーー ブ ーーーーーーーーーーー、、 9 8 
ロジ カル ・ セ クタ 4 が 書き 込ま れ 


ホス ト ・ バ ッ フ ァ が フル に な る と , 
ディ スク へ 格納 され る . 


書き 込み 


1 フィジカル ・ セ メモ リ 上 
クタ 分 の 容量 を も 

つ ホ スト ・ バ パ バップ ア 

ホス ト ・ バ ッ フ ァ に 格納 され た デー タ を , 

I28 バ イト 単位 の ロジ カル ・ セ クタ と し て アク セス する . 


ロジ カル ・ セ クタ 3 の 書き 込み . 
まだ ディ スク に は 格納 され な い . 


CPM の BDOS は , あ くま で | 
使用 セク タ を |I28 バ イト と し て 扱 書き 込み 
生 
32 1 実際 の ディ スク か ら 読 み 出 さ 
4 た 1 フィジカル *・ セ タタ ば ,. 
I128 バ イト の 整数 倍 の ^ ホ スト 
・ バ バッファ" に 格納 され , | セ 
クタ が I28 バ イト の ^ ロ ジ カ ル 
' ・ セ クタ *” と し て BDOS か ら ア 
0 クセ ス ざ れる, 
ユー ザー 側 か ら み れ ば , あ た 
か も 実際 の ディ スク が , 物理 
的 に | セク タ が |I28 バ イト で 
ある よう に 思え る . 


ロジ カル ・ セ クタ 2 の 書き 込み . 
まだ ディ スク に は 格納 され な い . 


ロジ カル ・ セ クタ | の 書き 込み . 
まだ ディ スク に は 格納 され な い . 


( 
! 
! 
“ 


使用 


Figure-1.1.15 ブ プ ブロッキング, デブ ロッ キン グ の 原理 
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CPM の 内 部 構造 こ 機能 の 詳細 


の OS の ウン セク ク 2 や 4 ディル スク を 朋 選 ソノ で セス 92 で と ざく 。 ボ おく N2 パ ウッ 
ァ を 介し て BDOS に より 処理 きれ ます . 「 

この 図 の 例 で 。 BDOS が ロジ カル ・ セ クタ 1 を 読も うと し て , BIOS が 自動 的 に フィ ジ カ ル ・ セ クタ 
1 を ホス トバ ッ フ ァ に 読み 出し た 時 点 を , 


HOST BUFFER DATA IS ACTIVE 


と 言い 、 ア ロッ ク バ ブツ ロッ クッ ルー ナチ ナシ の ブフ ラク "SFACTO る REH に し て 。 ロジ カル ・ セ ンク 1 
4 に 関し て は , ディ スク を アク セス する 必要 の な いこ と を 知ら せま す . | 
デブ ロッ キン グ は 。 この よう な 手順 を 各 フ ィ ジ カル ・ セ クタ で 繰り 返し . で きる だ け 高 速 に ディ ス 
ク か ら デ ー タ の 読み 出し を 行う た め の ア ル ゴ リ ズム で ある 訳 で す . 


ブロッキング 

プ ブロッキング は , デブ ロッ キン グ の 動作 の 流れ と 全く 逆 の こと を 行い ます . Figure-1.1.15 の 「 ブロ 
ッ キ ング の 原理 」 に 示さ れ て いる 図 に 従っ て 解説 し まし ょ う . 

例え ば "SAVE? コ マン ド な ど で . デー タ を シー ケン シャ ル に ディ スク に 書き 込む 場合 に つい て 考え 
て み ま す . | 
和 
し か し , この 段階 で は まだ ディ スク の フィ ジ カ ル ・ セ クタ へ の 書き 込み は 行わ れず , デー タ は BIOS に 
まり 。 お ボ 秦 7 バッ ファ に 一 時 的 に 格納 され る に と ど め られ て いま す . この 状態 は , 


HOST BUFFER WRITE IS PENDING 


の 状態 で あり ,、 ブロック, デブ ロッ ク ・ ル ー チ ン の フラ グ ,“HSTWRT”" を FFH に し て , フィ ジ カ ル ・ 
セク タ へ の 書き 込み を “見 合わ せ て いる ” こと を 知ら せま す . 

この \ 見合わせ? て いる 状態 は , ホス ト ・ バ ベ バッファ が フル に な る か , ま た は 強制 的 な 書き 込み 命令 が 来 
る まで 続き 。 図 の 例 で は , 4 ロジ カル ・ セ クタ 分 の 512 バ イト が 格納 され る の を 待っ て . フル に な る と 
同時 に 。 ディ スク の フィ ジ カ ル ・ セ クタ に 書き 込み が 行わ れ ま す . 

ディ スク へ の 書き 込み は , この よう な こと の 繰り 返し で あり , デブ ロッ キン グ と 同様 に 。 で きる だ 
け 高 速 に ディ スク に デー タ を 書き 込む た め の ア ル ゴ リ ズム で ある 訳 で す . 

デブ ロッ キン グ に お ける , 実際 の BIOS 内 で の デー タ の 流れ を , デブ ロッ キン グ を 行っ て いな い 標 準 
ディ スク の 場合 と 対比 し て , 次 に 図示 し て お きま す . プ ブロッキング に つい て は , この 図 の 動作 の 流れ 
を 送 に する だ け で す の で 省略 し ます . 


う 


単 密度 ディ スク (物理 的 な | セク タ が |I28 バ イト ) の 

シー ケン シャ ル な 読み 出し 動作 . 

| フィ ジ カ ル ・ セ クタ ー ニ | ロジ カル ・ セ クタ の 場合 
OH 


| に 


それ ぞ れ の 処理 は , 128 バ イト 単位 で , 


DMA バ ッ フ ァ を 介し て 行わ れる . 


(128 バ イト ) 


ノン 80H | DMA バ パッ ファ ン | 
' ーIOOH | 
識 衣 ' “ の 
は 処理 フィ ジ カ ル ・ セ クタ | を リー ド 
| gos つま り ロ ジ カ ル ・ セ クタ (|),(2), BIOS 
(3), (4) を リー ド . ーーーーー 一 


BI 〇 OS( 基 本 入出 カシ ステ ム ) 


高密 度 デ ィ ス ク ( 図 の 例 は , 物理 的 な 」 セク タ が 5|2 
バイ ト ) の シー ケン シャ ル な 読み 出し 動作 . 
「 フィジカル ・ セ クタ ニー ニ 4 ロ ジ カ ル ・ セ クタ の 場合 


I28X 4 バイ ト の 
9 赤 入 ホ ・ パ バッ プ ァ 
(HSTBUF ) 


それ ぞ れ の 処理 が , 128 バ イト 
単位 で ,DMA バ ッ フ ァ を 介し て 行わ れる こと は , 標準 ディ ス 
ク の 場合 と 同じ で ある . 


Figure-1.1.16 デブ ロッ キン グ を 行う 場合 と , 行わ な い 場 合 


年 ) ブロ ッ キ ング ,、 デブ プロ ッ キ ング の アル プリ ズム に つい て は 。 非常 に 門 的 に みれ の デア 
ジタル リサ ー チ 社 の 「CP プ M 2.0. ALTERATION GUIDE」 の 付録 CGC の ブロ ッ キ ング 。 デ 
プロ ッ キ ング の アル ゴリ ズム の 骨子 を 示し た ソー ス ・ リ スト を ご 覧 下さ い . また 。 こ の ソー ス ・ 
ファ イル は , 標準 CPM の ディ スク の 中 に も “DEBLOCK . ASM” と し て 含ま れ て いま す . 
た だ し , この “DEBLOCK . ASM” は , 1982 年 の 前 半 よ り 前 の リリ ー ス の も の に , 最後 の 128 
バイ ト が ディ スク に 書き 込め な いこ と が 発生 する 問題 点 が あり まし た . この アル ゴリ ズム を そ 
の まま 組み 込む ユー ザー は 注意 し て お いて 下さ い . 


以上 , CBIOS の 肖 子 に つい て 解説 し て きま し た が , これ ら の 知識 を 基 に , CBIOS を 作成 ある い は 変 
更 し た 場合 の CPM シス テム へ の 組み 込み と , その シス テム ・ デ ィ ス ク の 作成 に つい て は 。, 「 実 習 CP ン 
M」 の 4.10 章 と 4. 9 章 の , MOVCMP と SYSGEN の 項 を 参照 し て 下さ い . 


う づ 


CPM の 内 部 構造 機能 の 詳細 


1 .2 BDOS( 基 本 ディ スク ・ オ ペレ ー テ ィング ・ シ ステ ム ) 


BDOS は , プラ ッ ク ・ ボ ックス の モジ ュー ル で あり , ユー ザー が それ に 手 を 入れ る と いう こと は あり 
ませ ん . し か し , BDOS の 持つ 多く の 機能 は , ユー ザー が 有効 に 利用 で きる よう に , その すべ て が " シ 
ステ ム ・ コ ak と いう 形 で 公開 きれ て いま す . 

シス テム ・ コ ー ル は , 深 章 (2 章 ) に お いて , その すべ て の 機能 を サン プル ・ プ ログ ラム 付き で 解 
説 を 行っ て いま す の で 参照 下さ い . また , 当 「BDOS」 の 項 は , 2 章 の ' シ ステ ム ・ コ ー ル 」 の ファ イ 
ル 操作 に 関す る も の と は 密接 に 関係 し て お り , それ ら を 別々 に 解説 する こと や 理解 する こと は 不可 能 
で す . よっ て , 2 章 と 関連 し て 当 BDOS の 項 を 読ん で 下さ い . 

BDOS は プラッ ク ・ ボ ックス で す の で , その 人 解説 は シス テム ・ コ ー ル に 関連 する も の に な り ま す . 
その 中 で も 特に 重要 と な る , "ファ イル の 操作 の すべ て に 関係 する “FCB” (File Control Block) 
を 中 心 に 解説 を 行い まし ょ う . 


1 .2.1 ファ イル ・ コ ント ロー ル ・ ブ ロッ ク (FCB ) 


ファ イル ・ コ ント ロー ル ・ ブ ロッ ク (FCB) は , CPM が ファ イル の 各種 操作 を する た め に 必要 な , 
ファ イル や , その ファ イル の ディ スク 上 の 格納 場所 な ど , “ファ イル "に 関す る すべ て の 情報 を 持っ た 
プロ ッ ク の こと で あぁ あり, それぞれ の ファ イル の 1 つの ディ レク ト り に 対し て 1 つの FCB を 持っ て いま 
す . 

FCB は ,。 フ ァイル が アク セス され て いな い 定 常 状態 で は , その ファ イル が 存在 する ディ スク 上 の デ 
ィ レ クト リ ・ エ リア に 格納 され て いま す . 今 ま で 普通 に , “ファ イル の ディ レク トリ ” と 呼ん で いた も 
の は , 実は ディ スク に 格納 され た 状態 の 『 フ ァイル の FCB” で あっ た 訳 で す . 


DISk=B TRACK=O2 


BsoQ |「oo < 4 4 0 - MOVCFN 
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Bi2o | 
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Figure-1 .2.1 8 イン チ ナチ 標準 ディ スク の ディ レク トリ ・ エ リア の FCB を 見 る . 
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BDOS( 基 本 ディ スン 。 ォ オペ ベレ ラー ティ シル ダヴ ヽ ィ シ ステ デ テム) 


まず , 8 イン チ 標 準 デ ィ ス ク の ディ レク トリ ・ エ リア の FCB を 実際 に 見 て み ま し ょ う . ディ レク ト 
リ ・ エ リア は , トラ ッ ク 02 の セク タ 01 か ら 始 まっ て いま す が (実習 CP ン M の 2 . 3 音 参 照 )、 その 一 番 
最初 の 部 分 を ダン プ し て み ま す . シン クウ ェ ア ・ ラ ブ ズ 社 の "CPM ユー ティ リティ VOL.17 の 中 か 
ら の セク タ ・ ダ ンプ ・ プ ログ ラム を 使い ます . 


この リス ト に は , 4 つの ファ イル の FCB (通常 この 場合 は , ディ レク トリ と 呼ば れる ) が 示さ れ て 
いま す . その 中 の ファ イル \PIP . COM” に つい て , その 内 容 を 次 に 示す リス ト で 解説 し ます . 


Figure-1.2.2 ディ レク トリ ・ エ リア の 1 つの ファ イル の FCB の 内 容 : 


ディ スク 上 の ディ レク トリ ・ エ リア の FCB は , それ ぞ れ の ファ イル に 対し て , この よう な 形 式 で 格 
さ れ て いま す . これ ら の FCB は 、 フ ァイル の オー プン , MAKE, リネ ー ム , デリ ー ト な どの ファ ン 
クシ ョ ン を 行 う 場合 , 該当 ファ イル の も の が メモ リ 上 の FCB エ リア に コピ ー さ れ . それ を 基 に リー ド ノ 
フイ ト な どの 各種 の 処理 が 行わ れん ます. メモ リ 上 の FCB は , ファ イル 操作 が 行わ れる に 従っ て 更新 き 
れ て 行き , 書き 込み 操作 が 行わ れ た 場合 は , 最後 の パク ロー ズ ? の 実行 に より , 元 の ディ スク 上 の デ 
ィ レ クト リ ・ エ リア に 戻さ れ ま す . つま り は IBFCB が 更新 され ん た こと に な り ま す .. 

挫 に 。 ディス ク 上 の FCB が , “ファ イル の オー プン ? の ファ ンク ショ ン の 実行 に より . メモ リ の デフ 
ォ ー ル ト の FCB エ リア (5CH 一 7FH) に コピ ー さ れる こと を , 実際 に 示し て み ま し ょ う . 「 

まず , 任意 の ファ イル を オー プン し て , 何 も せ ず そ の まま CP ン M に 戻る 簡単 な プロ グラ ム を 作り ま 
す . ファ イル の オー プン は , シス テム ・ コ ー ル の 15 番 で す (2 章 を 参照 下さ い )」 

その ブロ グラ ム “FCBTEST* の アセ ンプ ブル 後 の PRN リ スト を 次 に 示し ます . 


うら 


CC ピン M の 内 部 構造 機能 の 詳細 


A>TYPE FCBTEST . PRN / 「 | 
| 


o1oo ORG 1ooH 

Q1QO QEGF MVI C。15 ーー 
Oo1o2 115Coo LXI D, 5CH コー 0 
o1o5 CDo5oo CALL ooo5H 

o1oB C9 RET -- CP/M へ 戻る . 

olo2 END 

A> 


_Figure-1 .2.3 任意 の ファ イル を オー プン し て , その まま CPM に 戻る だ け の ブログ ラム の PRN リ スト . 


実習 され る 方 は . この リス ト か ら ソ ー ス ・ フ ァイル を 作り , アセ ン ブ ル し た 後 , “FCBTEST . COM" 
を 作成 し ます . た だ し , 後述 の CPM と は 独立 し た モニ タ が な いと , 結果 の 確認 が で きま せん . 

で は , この プロ グラ ム を 実行 し て み ま し ょ う . Figure-1.2.1 一 2 に 示さ れ て いる も の と 同じ ガ ィ スク 
ま の % プ ザイル. ドラ イプ > 上 の *PIE CDOM′ を この プログ ラム に よっ て まで ジ シン し て で み ま チ 。 


Aa>FCBTEST BaPIP。CDM) プロ グラ ム の 実行 . ドラ イブ B : 上 の PIP. COM が オープ ン さ れる . 


A ゝ > オー プン され だ 後 CP/ M に 戻る . 


Figure-1.2.4 プロ グラ ム の 実行 、 ドラ イブ B : 上 の PIP . COM が オー プン され る 。. 


ディ スク が 数 回 アク セス され た 後 , CPM に 戻り まし た . その 間 に , ファ イル “PIP . COM”" が オ 
ー プ ン さ れ ま し た . この プロ グラ ム は ,。 フ ァイル を オー プン し た まま の 状態 で CPM に 戻る の で , 現 
時 点 の メモ リ 上 の FCB エ リア は , ファ イル が オー プン され た 時 の 状態 を 保っ て いま す . その 時 の メモ 
リ 上 の FCB 付 近 の 内 容 を , 筆者 の マシ ン の CPM と は 独立 し た 別 の モニ タ に より ダン プ し て み ま し ょ 
と アデ “ 

注 ) CPM の DDT で は , 現在 の FCB の 内 容 を 壊さ きず に ダン プ す る こと は で きま せん . 

メモ リ 上 の 現在 の FCB ア ドレ ス は , デフ ォ ー ル ト の 5CHー7FH で す . 


ェ の ダン プリ スト の ECB エ リア の 内 容 と 。Figure1.2 .1-2 の リス ト の 内 容 と を 比較 し て 下さ きい. デ 
ィ ス ク 上 の ディ レク トリ ・ エ リア の FCB が , この メモ リ 上 に コピ ー さ れ て いる の が 分 か り 王 


うつ 


BDOS( 革 本 ディ スク ・ オ ペレ ー テ ィング プ ・ シス テ /、) 
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Figure-1.2.5 ドラ イブ B : 上 の ファ イル “PIP . COM′” が オー プン され た 時 点 の FCB エ リア 付近 の ダ . 
PF 


Figure-1.2.4 に 示し た , 当 プ ログ ラム の 実行 の コマ ンド ・ ラ イン , 
A>FCBTEST。,B : PIP COM 


に よっ て , な ぜ “B :PIP. COM” が , この プロ グラ ム の 対象 ファ イル と な る の か は 。 後程 解説 し ま 
す . 「 

傘 に , FCB が どの よう に 構成 され て いる の か , その フォ ー マ ッ . ト を 図示 し ます . アド レス は , に 
M が デフ ォ ー ル ト と し て 設定 し て いる 5CH-7CH を 記入 し て あり ます . 


ンー ケン シャ ル ・ フ ァイル の 場合 は 00 一 32 の 33 バ イト を 使用 し , ラン ダム ・ フ ァイル の 場合 は , 
00 一 35 の 36 バ イト を 使用 し ます . 

Figure-1.2.6 に , ドラ イブ B : 上 の ファ イル \PIP.COM が オー プン され た 直後 の FCB を 示す Fi- 
gure-1.2.5 を 当て は め て みて 下 き さい. 上 

FCB は , 通常 . アド レス 5CH に 置か れ ま す が , 必要 で あれ ば TPA (トラ ンジ ェ ン ト ・ プ ログ ラム ・ 
エリ ア ) の どこ に 置い て も か まい ませ ん . 特に 複数 の ファ イル を 同時 に アク セス する 場合 は 。 2nd フ ァ 
イル 以上 の FCB は , TPA の どこ か ! に 置か ざる を 得 な いこ と に な り ま す . 


づ / 


CPM の 内 部 構造 と 機能 の 詳細 


00 … ロ グイ ン . ディ スク bit7ー| の 時 "RZ0" フ ァイル 0 一 |I28 の 値 . 
9 ms 亡 -。 bit7= ニ | の 時 ^SYS" フ ァイル 0 一 31 の 値 . 最初 に ユー ザー が 
匠 6 。 っ 6 00 を セッ ト す る . 


シス テム が 内 部 で 使用 


之 


低位 高位 


Figure-1.2.6 FCB の 構成 
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BDOS( 攻 本 ディ スク ・ オペ レー ティ ング ィ ジ システム バ ) 


1 .2.2 プロ グラ ム 実 行 時 の コマ ンド ・ ラ イン と FCB の 関係 
Figure-1.2.4 に 示さ れ て いる プロ グラ ム を 実行 する 際 の コマ ンド ・ ラ イン は 。 
4A>x・ ブ ログ ラム 名 、x : 対象 と な る ファ イル 名  (x:,。x: は ドラ イブ 名 ) 


と いう 形式 を と っ て いま す . 

Figure-1.2.3 に 示さ れ て いる この プロ グラ ム は , 対象 と な る ファ イル 名 に WS レス 5CH か ら の FCB 
に セッ ト し な けれ ば な り ま せん . し か し この 仕事 は 。 上 の コマ ンド ・ ラ イン を 実行 する こと に より . 
CCP が 自動 的 に 行っ て し まっ た の で す . 

この 機能 は , 各種 アプ リケーション ・ プ ログ ラム を 作成 する 上 で , 利用 する 場合 が 非常 に 多く 。 是 
非 と も 理解 し て お か な けれ ば な ら な い 機 能 の 1 つ で す . 

一 般 的 に は , 次 の よう な コマ ンド ・ ラ イン の 形式 で , 2 つの 対象 と な る ファ イ ル 名 (1st file, 2nd file) 
を , 5CH か ら の FCB に セッ ト す る こと が で きま す . 


A>x・program . extuux': 1stfile . ext_x/: 2ndfile . ext_abcxyz…… / 


この よう な コマ ンド ・ ラ イン を 実行 し た 場合 ,」 FCB に は どの よう に 格納 され る か , 実際 に 示し て み 
まお よ 学 っ 

その 準備 の た め に まず , ^RET? 命 令 (リタ ン 命 令 . コー ド は C9H) だ け の > を っ 孝和 まさ 7 注 . の ! デ 
ログ ラム "を 作り ます . この プロ グラ ム は , プロ グラ ム 自 身 は 何 の 内 容 も な く , 実行 きれ た 際 は 。 た 
だ , コ ント ロー ル を CPM に 戻す だ け の も の で す . その た め , この プロ グラ ム が 実行 され た 時 の コマ 
ンド ・ ラ イン は , CCP に よっ て 処理 され た まま の 状態 を 保つ こと に な り ま す . この 状態 の アド レス 00 
HーFFH の スク ラッ チ ・ エ リア を , CPM か ら は 独立 し た 特別 の モニ タ で ダン プ し て 確認 し よう と い 
う 訳 で す . 

RET 命 令 1 バイト だ け の プロ グラ ム を 作る 手順 を 次 に 示し ます . 


Figure-1 .2.7 "RET "命令 1 バイ ト だ け の プロ グラ ム を 作る . 


うつ 選 


〇 P ン M の 内 部 構造 と 機能 の 詳細 
以上 で ファ イル 名 “DUMMY . COM” の ,“ 何 も し な いこ と を 実行 する ? ワダ クム で 生ま は た 
は この プロ グラ ム を 次 の コン ドー ライ ン で 実行 し て み ま し ょ は う 。 
A>DUMMY。B : 1STFILE. ABC_C : 2NDFILE . XYZ_OPTION 』 
実際 の 実行 例 を 次 に 示し ます . 


メイ ン ・ コ マン ド オプ ショ ン ・ コ マン ド (〈 字 数 は , ス ペー ス も 會 め て 35 字 =23H 


A:DUMMy Bs 1STFILE。 ABC C:2NDFILE. XYZ OPTION/ この よう な コマ ンド ・ ラ イン を 実行 し て みる . 


n。> の ひ ② ③ C り 


Figure-1 .2.8 プロ グラ ム が 実行 され る 時 の コマ ンド ・ ラ イン と , FCB の 関係 を 調べ る 実験. 


この よう に , スク リー ン 上 は 何事 も な か っ た よう に CPM に 戻っ て いま す . 

この 間 に CCP は ,① の プロ グラ ム ・ フ ァイル “DUMMY . COM” を , TPA に ロー ド し て 100 共 か ら 
実行 する の は も ちろ ん の こと で す が , プロ グラ ム を TPA に ロー ド し 終わ り , 100H ス ター ト で 実行 する 
直前 に 。 コマ ンド ・ ラ イン の ②⑳② と ③ が , メモ リ 上 の FCB に セッ ト さ れる の で す . CCP が 使用 する デフ 
ォ ー ル ト の FCB ア ドレ ス は , 5CH か ら で す が , それ を 含む 0HーFFH の エリ ア を , Eigure-1.2.8 の 状態 
の まま 。 筆者 の CPM マシ ン に 独自 に 設け た 特別 の モニ タ で ダン プ し て み ま し ょ 2 (DDT な ど で は , 
FCB の 状態 が 変化 し ます ). 


入力 され だ オプ ショ ン ・ コ マン ド の 部 分 


02 は ドラ イブ B ・ 一 ッ ツ ト に 従 つて , FCB に コピ 
03 は ドラ イブ C : ) を 示し て いる . も 


OOUO ヒ 3 0O3 BA OO OO C3 06 AC 16 ささ OE 02| 06 04 79 ED 。.。..、.。. さ 。.-.y・ 
OO1O 2 OO 15 CO OO Ba 06 QO _QC 79 FE 1BI DA OF OO さき E 導 。。。。。。、 < アツ ーー ーーー デ 
OO20 53 D さ E8 DB EC OE O1 CS OC QO D ミ EAI CD 41 QO 3E 8。.. 
O0O3O BB BO D3 EB DB EC BZ7 F2 41 OO DE EB| 77 23 C3 34 。。。。。。。 人 。.・ い 相 。 人 4 
OO4O OO DB E8B E6 9D CB 1D C2 Q2 00 32 0| 00 2F D さ FF 。・.・・・・・・・・ デ で ーー/ 
OO05O こ OO ーー % らく 54| 。P。 。 ・・・・・ 158T 


OoQ6O 2 FILE ABC.....2ND 
0070 242 49 4C 45 20 5B 59 FILE YYV7、.、。. 
oo8Q 神 Bs 1STFILE. ABC 

ooo Cs 2NDFILE.XYZ ロ P 
QQAQ 10N、、 
OoQBO ーー。 _。 
QQCO _ー 。 _ 、。 
OoDo ーー ・ 
OQEO ーー {ーー〔{〔{ 
OOFO ーー 
この 値 *23* は , 入力 され だ コマ ンド ・ 入力 され だ オプ ショ ン ・ コ マン ド が , 入力 され だ 時 の まま の 

ライ ン の オプ ショ ン ・ コ マン ド の 字数 ・ 状態 で , 80H み ら の バッ ファ に コピ ー され て いる (アス キー 部 参照 ). 

が 23H で ある こと を 示し て いる . ・ 


Figure-1 .2.9 コマ ンド ・ ラ イン が FCB に コピ ー さ れる 様子 の 確認 、 
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BDOS( 基 本 ディ スク ・ オ ペレ ー テ ィ ン ブ ・ シ ステ ム ) 


CPM が 使用 する デフ ォ ー ル ト の FCB ア ドレ ス は 5CH で す (ユー ザー・ プ ログ ラム で は 。 任意 の ア 
ドレ ス に 設定 で きま す ). この ダン プリ スト の 5CHー7CH の FCB に は , オプ ショ ン ・ コ マン ド 部 の ② と 
③ が , Figure-1.2.6 に 示さ れ て いる フォ ー マ ッ ト に 従っ て 格納 され て いる こと が 分 か り ま す . SU 
③ に つい て は , 通常 は シス テム 内 部 で 使用 3 され る 6CH か ら の エリ ア に 格納 され て いま す . 

一 方 。④ は , FCB に は 格納 され て いな いこ と に 注目 し て 下さ い . コマ ンド ・ ラ イン の ①, ⑨, ③, 
(④⑧ を 区 別 す る の は , それ ぞ れ の 間 に 置 いた スペ ー ス で す . そし て , ② と ③ の 先頭 に 。 ドラ イブ 名 が あ 
れ ば , それ ら は Figure-1.2.6 の “dr” の バイ ト に 示さ れ て いる よう に , ドラ イブ ・ コ ー ド に 変換 きれ 
て FCB に 格納 され ます . ドラ イブ 名 が な い 場 合 は . ログ イン ・ デ ィ ス ク を 指定 し た と みな され , ドラ 
イブ ・ コ ー ド 00 が 格納 され ます . 

以上 の よう に , Figure-1.2.8 の コマ ンド ・ ラ イン を 実行 する と , プロ グラ ム が TPA に ロー ド さ れ , 
100H ス ター ト で 実行 され る 直前 に , コマ ンド ・ ラ イン の ② と ③ の 部 分 が FCB に , FCB の フォ ー マ ッ ト 
で 格納 され る こと が 理解 され た と 思い ます . 

さら に も う 1 つ , 重要 な こと が あり ます . 

アド レス 80H か ら の デ ヂ デフォー ルト の DMA バ ッ フ ァ に , Figure-1.2.8 の コマ ンド ライ ン の ② 以 後 が , 
何 の 変更 も 受け ず に 入力 し た 時 の 状態 の まま で 格納 され て いる こと で す . その 先頭 アド レス の 80H に は ., 
入力 され た オプ ショ ン ・ コ マン ド 部 の 総 入 力 文字 が 格納 され ます . この 80H か ら の エリ ア に は , 入力 し 
た も の は すべ て , ④ 以 後 の 部 分 も 格納 され る の で す . 

_ この 80H か ら の バッ ファ に 格納 され る タイ ミン グ も , 先程 の FCB の 場合 と 同じ , 100H ス ター ト の 直 
前 で す . 

ユー ザー は , ユー ザー・ プ ログ ラム の 中 で , 前 者 の FCB に 格納 され た 2 組 の ドラ イブ 名 と ファ イル 
名 , それ に 後者 の アド レス 80H か ら の エリ ア に 格納 され た , 入力 され た まま の 状態 の オプ ショ ン ・ コ マ 
ンド ・ フ イン を , 自由 に 利用 する こと が で きま す . 

_ 例えば, 


A>DDT_」ABCD . COM 
A>DUMP_OPQR . XYZ J 
A>ED_DUMP . ASM / 


な ど は 前 者 の FCB を 利用 し , 


A>MOVCPM、,64、」* リ 
A>STAT_PUN : =UP1 : 
A>PIP、B : =ASM . COM [V] / 


な ど は 後者 の 80H か ら の バッ ファ を 利用 し て いま す . 
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いずれ に し ろ 。 これ ら の こと は 。 次 章 の 「 シ ステ ム ・ コ ー ル 」 の ファ イル の 操作 等 に 関す 
る も の と は 密接 に 関係 する こと で あり, それ ぞ れ を 単独 で 理解 する こと は 不可 能 で す . よっ 
て 。 次 章 と 本 章 と は 一 体 で ある と 考え て 交互 に 参照 し て 下さ い . 


1.3 カナ 文字 へ の 対応 


日 本 の パー ソナ ル ・ コ ンピュータ の CPZM は , すでに カナ 文字 対応 が で き て いる も の が 多い の で す 
が 。 そ う で な い 標 準 CP ン M 上 で , カナ 文字 の 使用 が で きる よう に する た め の 変 更 箇 所 を 示し て お きま 
し ょ う . これ は 筆者 が 「 標 準 CPZM ハ ンド ブッ ク 」 に も 紹介 し まし た が , ここ で は その 変更 作業 を 具 
体 的 に スク リー ン 上 の リス ト で 示し ます . 

その 前 に , BIOS 内 の コン ソー ル 入 出力 ルー チン や , プリ ンタ へ の 出力 ルー チン な ど に は , 入出 力 デ 
ー タ の 最上 位 ビ ッ ト を 0 に する 操作 を 行っ て いな いと いう こと が 前 提 で す . 


*A>*" の あと に カナ 文字 を キー イン で きる よう に する た め の 変 更 

コン ソー ル ・ コ マン ド ・ レ ベル で , カナ 文字 を 入力 で きる よう に する た め の 変 更 で す . こ れ を 行う と , P1P 
コマ ンド の 文字 列 サ ー チ ソン パラ メー タ で ある , [S] や [Q] を カナ 文字 で も 使用 する こと が 可能 と な り 
ます . また 。 コン ソー ル ・ コ マン ド ・ レ ベル で な く て も , ED コマ ンド 内 の 文字 列 置き 替え や サー チ ・ 
コマ ンド の 『"S?。 "FE? な ど に も カナ 文字 の 使用 が 可能 と な り ま す ., 

変更 箇所 は 基本 的 に は "MOVCPM . COM” を DDT で ロー ド し た 時 の アド レス 13F5H の デー クタ , MM 
F” が 入力 キャ ラク タ の 最上 位 ビ ッ ト を 0 に する マス ク な の で , これ を “FT” に で も 変更 し て , 新た 
に シス テム を 作り 上 げ れ ば よい の で す . 

実際 は 。 次 の 実例 に 示す よう に すれ ば 簡単 に 新 シ ステ ム が 作れ ます . CPM の マス ター・ デ ィ ス ク 
を コピ ー し て , それ を ドラ イブ A : に セッ ト し て 起動 し て か ら 始 め ま す . 
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カナ 文 へ の 対応 


人 - 改造 前 の シス デム. “アイウエオ "と 入力 し だ が , この よう に "12345 と な り , NT 


12345? カナ と し て は 受付 け て いな い . 


A>SYSBEN) SYSGEN を 起動 , 

SYSBEN VER 2.2 3 ー 

| BODURCE DRIVE NAME (DR RETURN TO SKIP)A ) ドラ イブ A : 上 の CPZM シ ステ ハム を メモ リ 上 に ロー ド さ する. 
SOURCE UN A。 THEN TYPE RETURN/ 上 
FUNCTI ロ N CUMFLETE 

DESTINATIDN DRIVE NAME (OR RETURN TO REBOOT)) メモ リ 上 に ロー ド し た まま CPM に 戻る . 


この ページ 数 は , そ れ ぞ れ の CP /M の BIOS の 大 き さ に より 異な る . オ ー バ する の は か まわ な い . 
A>SAVE_40 CPM.CM CHM ) メモ リ 上 の CP ン M シ ステ ム の イメ ー ジ を , ファ イル *CPM. OOM“ と し て , ディ スク に セー ブ す る . 


ADDT _ CFM。CDM ) DDT を 起 勤 し , 先程 の "CPM.COM/ を ロー ド す る . 
DDT VERS 2.2 


MT Be 確認 の だ め の ダ ンプ . 
っ 9O0O O1OO _/ この "ANI 7FH" により, 入力 キヤ ラフ タ の 最上 位 bit ガ 0 に され る . 
ーD1 さ FO。 1 さ FF / 
| 13FO ES CD FB CC E6 [7F| E1 C1 FE OD Ca C1 CE FE Oa CA へ 。 フ テ 。。 リ テ ホ 。 。 
ー ら 13F5 / | 
13FS 7F FEF/ 7F を \FF* に で も 変更 する (すべ て の キャ ラク マタ が 通る ). 
13FA EL 。)】 | 


-BO_ ) リプ ー ト し て CP ン M に 戻る . 改造 され だ COP ン M シ ステ ム は メモ リ 上 に ある . 


A>SYBGEN 」 
SYSBEN VER 2.2 SYSGEN を 起動 . 

SDURCE DRIVE NAME ( ロ R RETURN TU SKIP) / スキ ッ プ する . 

DESTINATION DRIVE NAME (DR RETURN TU REBOOT)a | メモ リ 上 の 下 造れ だ CP, ン M シ ステ ム を , 
DESTINATIDN ON QA。 THEN TYPFE RETURN ドラ イブ A : の シス テム ・ ト ラッ フ に 組み 込む . 
FUNCTIDN CDOMPLETE 

DESTINATI ロ N DRIVE NAME (OR RETURN TO REBDOT) / 改造 シス テム ・ デ ィ ス フ で き 上 り .CP /M に 戻る . 


1 ノ 


Figure-1.3.1 カナ 対応 の CPM シス テム を 作成 する 手順 . 


| リセ ッ ト | 


人 > アイ ウエ オ ) 改造 さま ね だ CP ZM を 起動 し だ 後 . パ アイ ウエ オ ” と 入力 し て み だ . 
アイ ウエ オフ この よう に 受付 ちら ね て いる . 


Figure-1.3.2 コン ソー ル ・ コ マン ド の レベ ル で も カナ が 使え ます . 
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CPM の 内 部 構造 ご 機能 の 詳細 


DDT の ダン プ ・ コ マン ド の アス キー 表示 部 に カナ 表示 を させ る た め の 変 更 
これ も CPM の マス ター・ デ ヂ ディスク か ら コ ピー し た “DDT . COM” を 準備 し て , 次 の 手順 で 行い 
ます 、 


A>DDT DDT.COM ) DDT を 起動 し , 自 分 自身 を ロー ド す る . 

DDT VERS 2.2 、 5 

NEXT PC 人 和 の だ ため の ダ ンズ 

1400 O10O  : この *GPI 7FH* で その 値 以上 の キャ ラフ タ を *. "に し て し まう . 
| =DESO0JESF」 計 ] パッ 


OE30 058 0C 7D CS OS OC FE[7Z7F|1D2 240 OF FE 20 D2 ヒ 7 OB 。。 ナ 。。。・・.⑳。。。 、。。 カナ は 表示 され 
ーSE さ 7 / | な い . 


2 っ ーー , それ を `FF^ と すれ ば すべ て の キャ ラク フタ が , その まま コン ソー ル に 送ら れ 表 示さ れる . 


ーBO 7 ご - リ プー トレ て CP ン ノン M に 戻る 


A>SAVE 19 DDT。EHR /】 メモ リ 上 の 改造 DDT を セー ブ す る . 改造 DDT の で き 上 り . 


A>DDT DDT.COM) 改造 DDT を セー ブ す る . 

DDT VERS 2.2 

NEXT PC 

14oQ ol1oo 

-DE3O。E4F 」 

OESO 05 0C 7D CS 05 OC FE FF D2 40 0C FE 20 D2 ヒビ 7 OB 。。) テ 。。. メ 9。 メ 区 。| 。 

OE40 3E 2E CS ヒ フ OB EB 20 5F OF 7D 93 6F 7 98 EB C9 >。 テ KK。* 。)og1 ノ フフ グ 表 示 お れ て いる . 
ーGO / 


Figure-1.3.3 アス キー 表示 部 に カナ を 表示 させ る た め の DDT の 改造 . 


レス ( 


デム ・ こ ルル に 佐 


2.1 シス テム ・ コ ー ル と は 


シス テム ・ コ ー ル と は , CPM が 持っ て いる コン ソー ル な どの 各 周 辺 装置 と の 入出 力 機能 や , ディ 
スク ・ フ ァイル の 各種 操作 な どの 機能 を , 外部 の ユー ザー・ プ ログ ラム か ら 使 用 する こと を 許し た CP/ 
衣 の ジン スチ ム ・ サ ービス の こと 華 冗 

シス テム ・ コ ー ル は ,。 "ファ ンク グン シ 当 還 還 還 ee 棚 全 商 還 一 バー バイ ザ ・ コ ー ル ” と も 呼ば れ て お 
り , CPZM に と っ て この 機能 は 大 変 重要 な も の で あり , シス テム ・ コ ー ル あっ て の CPM と 言っ て も 
良い で し ょ う . 

CP〆M が , 今日 ,。 マ イク ロコ ンピュータ の OS の 標準 に な り 得 た の も , この 多く の 機能 を 持つ シス テ 
ム ・ コ ー ル を , 使い や すい 形式 に 整備 し て , ユー ザー に 提供 し た 点 に ある と 筆者 は 考え て いま す . 
wes ド ワウ ィ ェ ズ に 履 松 を な らい,、 この シス ホー コニー ル を 未 要 し て 、、 各 ソフ トワ ウェ チ ・ メ な かー は 。 ちら 
っ せい に 各種 の ソフ トウ ェ ア を 製品 化し まし た . つま り , シス テム ・ コ ー ル を 使っ た これ ら の ソフ ト 
ウェ ア は , CP/M マ シン な ら ば , すべ て の 機種 で 実行 する こと が で きる の で す .、 そ し て , これ ら の ソン 
フト ウェ ア が , 今日 CPM を 取り 巻く ,。 お び た だ し い 数 の ソフ トウ ェ ア 和 群 と な っ て いる の で す . 


さて , みな さん が , CP/M 上 で 実行 する 何ら か の プロ グラ ム を , ア セン ブラ で 作る 場合 を 想定 し て 
下る きい ゅ い 。 ます 。 コン ピュ ー タ の 入出 力 で 最も 基本 的 な 。 コンソ ー ル の 入出 力 に つい て 考 > ぇ て み ま し ょ 
 。 

「 キ 一 ボー ド か ら よ 文字 和 大 力 す る プロ グラ ム と 。 スク リー ンス 1 文字 表 きせ る プロ グラ ム を 作り 
な さい . 」 と いう 間 題 で す . 「 

さて 。 あな だ な ら ど うし ます か 7? 

エー と と こと の ヨン ピュ ニニ み の を 一 ボー ド テ デー タ の 入力 ポト アデ ドレ ンス は 。。 殖 か yz 日 の 、 ステー 
タス bit は bit0 で , …… と 考え 始め た 方 は どう し て も この 章 を 読ま な けれ ば な り ま せん . こん な に 便 
利 な 機能 が ある の で す . 

問 本 の プロ グラ ム は 、。 シス テム ・ コ ー ル を 便 う と 。 交 の みよ うに スマ ー ト に 解 央 し ます 。 


コン ソー ル 入 力 (通常 は キー ボー ド か ら 1 文字 入力 ) 


2 
入力 が あれ ば , 入力 デー タ が A レ ジス タ に 入っ て いる 
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全 シ ステ ハム ・ コ ー ル 徹底 衣 説 


一 考 。 コン ソー ルム へ 1 文字 出力 する 場合 は 次 の よう に な り ま す . 


コン ソー ル 出 力 (通常 は スク リー ン に 1 文字 出力 ) 
出力 デー タ を A レ ジス タ に 持っ て いる 場合 。 
衝 


AA レジスタ の 文字 が , bh の 
この よう に わずか 2 3 ステ ッ プ で これ ら の 機能 が 記述 で きる の で す . そし て , 重要 な こと は , こ 
こ に は , 先程 の ポー ト ・ ア ドレ ス の よう な , コン ピュ ー タ の ハー ドウ ェ ア に 関す る こと が , 表面 に は 
一 切 現 れ て いな いこ と で す . 従っ て 機種 の 異な る どの よう な CPM マシ ン で も , この プロ グラ ム は 共 
通 に 動作 する こと に な り ま す . 
シス テム ・ コ ー ル の 一 般 形 を 次 に 示し ます . 


シス テム ・ コ ー ル の 一 般 形 


MVI C, function No. 
(LXI D, address ある い は MVIE, parameter) 
CALL 0005H 


(結果 を 返す も の は , 結果 が A あ る い は (H, L) レジ スタ に 格納 され る .) 


導 フ ァ ン クシ ョ ン No。 を し レ ゼス vw を 


娘 (ファン クシ ョ ン に よっ て は 。2* 芝 メー を (人 B 間 ベア レジ スタ また は E レ ジス 
タ に セット.) ' 
竣 ア ドレ ス 0005 番 地 を CALL. 
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3 ペコ や 大 拡 


この , 2 ステ ッ プ また は 3 ステ ッ プ で , Figure-2.1.1 の シス テム ・ コ ー ル 一 覧 表 に ある , すべ て の 
機能 が 実現 で きる の で す . 

CALL し た 結果 は , コン ソー ル へ の 1 文字 出力 の よ う に , 直接 に 動作 や 現象 と し て 現れ る ファ ンク シ 
ョ ン の も の と , 結果 の デー タ が 得 ら れる ファ ンク ショ ン で は , 1 バイ ト の 場合 A レ ジス タ に , 2 バイ 
ト の 場合 (HH, L) ペア レジ スタ に デー タ が セッ ト さ れ て 戻る も の が あり ます (CP ン M ver1.4 と コン 
パパ ビリ ティ を 保つ た め , H, し レジスタ と 同じ 値 が . A, B レ ジス タ に も 格納 され て いま す ). つま り , 
結果 は , 


文 動作 と し て 現れ る . 
誠 1 バイ ト の 結果 は A レ ジス タ に . 2 バイ ト の 結果 は (H, L) ペ アレ ジス タ に 格納 され 


て ル ゃ る 。 


この 機能 が ,」 CPM の パシ ステ ム ・ コ ー ル / と 呼ば れる も の で す . 
人 次 具 に シス テム ・ コ ー ル の ファ ンク ショ ン 一 覧 表 を 示し ます . 


シス テム ・ コ ー ル に お ける スタ ッ ク の 扱い に つい て 

ンス テム ・ コ ー ル され た 内 部 で は , 独自 の スタ ッ ク ・ ポ イン タ が 使用 きれ て お り , ユー ザー・ プ ブロ 
グラ ム 上 の スタ ッ ク は 一 切 消費 し ませ ん . よっ て ユー ザー は , シス テム ・ コ ー ル 内 部 で の スタ ッ ク の 
消費 を 考慮 する 必要 は あり ませ ん . 

ここ で の シス テム ・ コ ー ル の サン プル ・ プ ログ ラム は , 簡素 化 の た め に , ほとん どの も の は ユー ザ 
ー・ ブ ログ ラム で スタ ッ ク ・ ポ イン タ を 設定 せ ず に , CCP 内 の スタ ッ ク を その まま 継続 し て 使っ て い 
ます . CCP か ら ユ ー ザ ー・ プ ログ ラム に コン トロ ー ル が 移っ た 時 に 。 CCP が 使用 し て いた 7 レベ ル の 
スタ ッ ク が 使用 可能 で す が , これ 以上 に スタ ッ ク が 深く な る プロ グラ ム の 場合 は 。 ユー ザー・ プ ログ 
フ ム で , 新た に スタ ッ ク ・ ポ イン タ を 設定 する 必要 が あり ます の で 注意 し て 下 き さい. “ 


4 


全 シ ステ ハム ・ コ ー ル 徹底 解説 


パラ メー タ の セッ ト 
(DE レジ スタ また は E レ ジス タ へ ) . 


入力 : Aー- キ ャ ラク タ 出力 : コン ソー ル へ 出力 
IO バイ ト の 取り 出し な し AI0 バ イト 
IO バイ ト の セッ ト |0 バ イト IO バイ ト が セッ ト さ れる 


文字 別 の プリ ント アウ ト E 文 字 別 アド レス 


すす EE みみ S で 瑞 寺 通 


“ コン ソー ル か ら バ パッ ファ へ 入力 
し 入力 あり :A-FFH 入力 な し :Ac-00 


:A 一 ディ レ 
ン さ れ た ファ イ 
が な い : 


正常 : Aー デ ィ レ クト リ ・ コ ー ド 
ファ イル が な い : AFFH 


正常 人 スー ディ レク トリ ・ コ ー ド 
ファ イル が な い : AーFFH 


還 吉 避 要 通 流 SS ニ マロ ロー スラ 


HL アロ ケー ショ ン ・ ベ クト ル ・ ア ドレ ス 
ログ イン ・ デ ィ ス ク が RH/0 に セッ ト さ れる 
HL 一 ベク トル 


A 一 ディ レク トリ ・ コ ー ド 
ファ イル が な い : AFFH 


麗 紀 寺 生 輝 ざ さ ざめ ざ ユ 届 


2 


了 入 遇 使用 され て いな い 
ゼロ ・ フ ィ ル を 伴う ラン ダム ・ ラ イト | DE-FCB ア ドレ ス 正常 ・A-00 エラ ー : A- エ ラー コー ド 


注 ) HL レジ スタ と 同じ 内 容 が AB レジ スタ に も セッ ト さ れる . 
ー 注 ) ファ ンク ショ ン 12 は , バー ジョ ン |1.4 で は 「 ヘ ッ ド の リフ ト ア ッ プ 」 の ファ ンク ショ ン で ある . 
注 ) デ ィ レ クト リ ・ コ ー ド : 1I28 バ イト 中 の 該当 ディ レク トリ の 位置 に より , 0 一 3 の 値 を と る . 


Figure-2.1.1 シス テム ・ コ ー ル 一 覧 表 


ら 0 


シン スズ ステム ・ コ ー ル 徹底 実習 


2.2 シス テム ・ コ ー ル 徹底 実習 


何 は と も あれ , これ ら の すべ て の 機能 を 簡単 な プロ グラ ム て で 実習 し て み ま し ょ う . 実習 用 の サン プ 
ル ・ ブ ログ ラム は 。 それ ぞ れ の シス テム ・ コ ー ル ” を ,。 や さき しく 解説 する こと を 第 1 上 晒 計 。 あ 
た (アル ゴリ ズム の スマ ー ト さ な ど は , 問題 に し て いま せん の で あし か ら ず ). それ ぞ れ の プロ グラ ム ・ 
リス ト と その コメ ント 文 が 。 シス テム ・ コ ー ル に つい て の 何より の 解説 に な り 9 ます の で .3 り 9 スト を よ 

く 〈 見 て 下さ い . 
最初 に 示す 実習 プロ グラ ム Figure-2.2.1 だ け を みて も , シス テム ・ コ ー ル の 概念 は つか め る と 思い 
還 - セテ 


ファ ンク ショ ン : 0… シ ステ ム ・ リ セッ ト 


CALL 手 順 
IM VI だ 
| CALL 0005H ' 
機能 
0 番地 へ の ジャ ンプ , ある い は Ctrl-C の キー イン を 行っ て リブ ー ト し た 場合 と 同機 能 で ある . この 
ファ ンク ショ ン を 実行 する と , “WBOOT? (BIOS+ 3 番地) へ の ジャ ンプ が 行わ れる . 


CALL 手 順 
MVI に 
CALL 0005 昌 H 


過 
(入力 キャ ラク タ が A レ ジス タ に 格納 され て いる ) 
機能 
コン ソー ル ( 通 常 は キー ボー ド ) か ら の 入力 が あれ ば , 入力 キャ ラク タ を A レ ジス タ に 持っ て CALL か 
ら 戻 る . と 同時 に , コン ソー ル (通常 は スク リー ン ) に 入力 キャ ラク タ を 出力 (エコ ー・ バ バック) す 
る . 入力 が な い 場 合 は , 入力 され る まで 内 部 で ルー プ し て いる . 


全 シ ステ ハム ハ ・ コ ー ル 徹底 衣 説 


コン ソー ル へ の エコ ー・ バ ベック に 関し て は 。Ctrl-S,。 Ctrl-P,。 タブ の 各 機 能 が 働く (ファ ンク ショ ン . 


CALL 手 順 

MVI こる 

(も ) で : 出力 キャ ダグ 

CALL 0005H 
機能 
FE レジ スタ に セッ ト さ れ た ASCII キ ャ ラク タ を , コン ソー ル ( 通 常 は スク リー ン ) に 出力 する . この 出 
力 に 関し て は ., コン ソー ル か ら Ctrl-S に よる ポー ズ や , 事前 の Ctrl-P に よる リス ト 出 力 , さら に 8 文字 
ご と の タブ 処理 が それ ぞ れ 機能 する . 


実習 プロ グラ ム ファ ンク ショ ン :0,1,.2 


RE ] 
コン ソー ル か ら 1 文字 入力 する と , コロ ン ~ : ” に 続い て 入力 され た 文字 が , 255 文 字 連 続 し て 
コン ソー ル に 出力 され , Ctrl-R を 入力 する と シス テム ・ リ セッ ト が 行わ れる . 


ko デ ロ グラ スス を 作っ て みみ まし しょう. 
この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 湊 に 示し ます . 


人 QA>TYPE りー1-2。PRN/ 


H ーー ーー ロー ーー ーー ーー ーー 1 


FUNCTIDN Oz SYSTEM RESET 5 
1』 CONSOLE INPUT 
2』 CHNSUDLE OUTPUT 


GSTARTs 
り 9402 4E2 の MVI ビッ ま " 」、*? ガ ス フ リ ー ン に 出力 され る 。 
Q104 CDOS5OO CALL OOO55H 、 
O10 フ 2 OEQ1 MV 1 C。 1 6 ン ソ ー ル 入力 "の シス テム X コー ル . 
O1O9 CDO5QO CALL OOO5H Po ある まで . この 内 部 て ルー プレ て 
O1QOC さ 24901 GTA BUFF | キー 入力 デー タ を *BUFF" へ スト ア . 
010F FE12 CF 12H =“R : キー 入力 デー タ が Ctrl-R の と き は , “RESET" 
O111 CA4401 2 RESET "| へ ヘ ジ ャ ンプ . 


1 
PD 


ウフ 


シス テム ・ コ ー ル 徹底 実習 


2 S 1 
0 の ea | - コ ン ソ ー ル 出力 ~ の シス テム コー ル . 
Q118 CDo5oo EnLL oooehj 
O11B Q6FF MVI B, 255 - 出力 文字 数 の カウ ンタ .255 文 字 出 力 する だ め . 
LOOF 
O11D 3a49o1 LDa BUFF キー 入力 デー ツタ を ムレ ジス タ に ロー ド 、 
O12Q C5 PUSH B | 
の 。 | 
o123 5F 5 ゲ  ' | コン ワ 2L 和 H の ラス タコ ーb 
ア 1 ーーー】 る 2 ッッ 
Q124 CDO5QO CALL ooo5sH | ^ レ ジス ツ の 文字 が ス フ リ ー ン に 出力 され る . 
O127 1 POP B 
Oo128 Oo5 DCR B [ - 
2 2 ー プ ヴ る 、 
Q129 C21Do1 JNZ ah の の で や リン 
O12C QEo2 MVI 5.2 
012E 1EOD MVI E。OQDH キャ リリ ッ ジ ・ リ マン を スク リー ン に 出力 . 
o13o CDo5oo CALL ooosh 
O13 さ oEo2 MV C+ 
O135 1EOA NVI E,OAH : ライ ン . フ ィ ー ド を スク リー ン に 出力 
Oo137 CDo5oo CALL ooosH 
Q13 QEO2 MV』 ーー 
O13C 1EoA MV1 E, QAH とり Ya 。 
O13E CDO5oo CaLL ooosH こ 出力 
O141 C さ ooo1 JhiP BTART 最初 か ら 繰り 返し . 
RESET: 、、 っ こ ーー 
O144 OEoo MVI 0 1 し 生生 の で の 。 
O146 CDoO5ooQ CALL oOosl | フフ ー に と 同じ 機能 な の で , ご の あと に 上 
O149 BUFFs DS 』 キー 入力 の 1 文字 バッ ファ . 
O14A END 
で 注 ) コン ソー ル 入 出力 を , キー 入力 , スクリ ー ン 出力 と し て 説明 レ て いま す . 
Figure-2.2.1 ファ ンク ショ ン : 0。1, 2 実習 プロ グラ ム の PRN 形 式 ソ ー ス ・ リ スト . 


お 生じ mn ス ・ サ も あか あら 、 エ まん 本 を 本 妥 で チタ ケッ プ こみ ニッ 。 ファ イル を 作り , ASM~LOAD 
を 行い “0-1-2 . COM? を 生成 し 実行 し て み ま し ょ う ). 
ファ ンク ショ ン :0,1.2 実習 プロ グラ ム の 実行 

0-1-2 . COM" を 実行 する と ,。 プロ ンプ トド \*? が 出力 され る の で , 適当 な 文字 を キー イン し ます . 
*:? に 続い て , 入力 され た 文字 が 255 文 字 出力 され ます . 

文字 の キー イン 直後 に 素早 く Ctrl-S を キー イン し て , 255 文 字 の 出力 が ポー ズ に な る こと や ., 事前 の 


Ctr 上 PF に よる プリ ンタ へ の 出力 、 タ ブ (TAB キ ー が な い 場 合 は Ctrl- I で 代用 で きる ) の 処理 な ど が 機 
能 す る こと を 確認 し て 下さ い . 


の 


全 シ ステ ハム ・ コ ー ル 徹底 解説 


実行 例 を 次 に 示し ます . 


eo ンーーー コン ソー ル 入 力 " 自身 の 表示 . 


ーー 入力 され だ 文字 が 255 文 字 パコ ン ソ ー ル 出力 "” され て いる , 
*Ai QAAAAAAAAAAAAAAAAAAAAAAAAAAAARAAAAARAAAAAAAAAAAAAAAAAAAAAAAARAAAAAAAAAAAAAAANA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAA キヤ リッ ジ ・ リ タン と ライ ン ・ フ ィ ー ド が 行わ れ て いる . 

ー も う 1 度 ラ イン ・ フ ィ ー ド ガ 行 われ て いる . 

*5: 55555555555555555555555555555555555555555555555555555555555555555555555555555 
55555555555555555555555555555555555555555555555555555555555555555555555555555555 
55555555555555555555555555555555555555555555555555555555555555555555555555555555 
555555555555555555 「 


ポア エア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア 
アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア 
アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア 
リナ アア ま アア アア アア アア アア ナチ 

へ R =-Otrl-R の 入力 に より バシ ステ ム ・ リ セッ ト "” が 行わ れ , CP ^ M に 戻 つ だ . 


人 


活 ) CPIOtPIー 門 Ctrl-| な どの 実験 も 行 つ て 下さ ざい 、. の 


Figure-2.2.2 ファ ンク ジ ション! 0。 1。 2 実 避 プ ログ ラム の 実行. 


8.4 


ファ ンク ショ ン : 3… リ ー ダ か ら の 入力 


CALL 手 順 
MVI じ 。 3 
し た A 上 も 0005H 


に 2 
(入力 デー タ は A レ ジス タ に 格納 され て いる ) 
機能 
ロジ カル ・ デ バイ ス の び RDR : / に 入力 が あれ ば , 入力 デー タ を A レ ジス タ に 持っ て , CALL か ら 居 
る . 入力 が な いひ 場 合 は , 入力 され る ま て 内 部 で ルー プ し て いる . 


ら 和 4 


シス テム ・ コ ー ル 徹底 実習 


ファ ンク ショ ン : 4 … パ ンチ へ の 出力 


CALL 手 順 
MVI し 。 4 
(E) < 出力 デー タ 
CALL 0005H 
機能 


れれ レジ スタ に キッ ト きれ て いる デー タタ を 。 せ ジ カル ーー デ イス の PUN : 7 に 出力 する 


ファ ンク ショ ン : 5… リ スト へ の 出力 


CALL 手 順 
MVI っ ・ 
(ーー 出 カ デー タ 
CALL 0005H 
機能 


デメ に あッ も まれ て いも デー を , ロジ み ル レデ ア オイ あの ST / に 当 カ する 


実習 プロ グラ ム ファ ンク ショ ン : 3.4.5 


"RDR :" デパ イス か ら 入力 し た デー タ を , メモ リ 上 に バッ ファ し て 行き , Ctr-P (10H) が 入 
力 さ れる と , 今 ま で に バッ ファ し た 内 容 を `PUN : デバ イス へ 出力 する . また , Ctrl-L(0CH) 
が 入力 され る と , “LST : ” デバ イス に 出力 する . Ctrl-Z ( 1 AH) が 入力 され る と , 本 プロ グラ 
ム を 終了 し , CP ン M に 戻る . | ' 


この よう な ブロ グラ ム を 作っ て み ま し ょ う . 「 
この ブロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


らら 


この ソー ス ・ リ スト か ら ア セン プリ ・ ソ ー ス ・ フ ァイル を 作り , “3-4-5 . COM” を 生成 し て ブロ グ 


ゃ 
OEO る 
CDQSQOQO 
E 1 


FE1O 
CA1EO 1 
FEOC 
CA さる う O 1 
FE1A 


に じ さ O さ 0 1 


<1480) 1 
7E 
FEOO 
CAOQOO 1 


C さ 2101 


21480 1 
アビ 
FEOO 
CAQOQO1 


ES 
OQOEO5 

ら F 
CDOSQO 
まま 


2 くさ 
じ さ さ 6O 1 


Figure-2.2.3 


底 解説 


PUNOUTs 


LSTOUUTs 


BUFF 


ング 和信 . : 


ラム を 内 行 し て み ま し ょ う ). 


らら 


4 , 


| "リー タダ 入力 * の シス テム ・ コ ー ル . 
na アド レス ・ ポ イン で ある H, し レジ スマ を 
9 を 、 
H | 保護 し て いる . 
1OH ョ =“P ! 入力 が Ctrl-P な ら ば , バッ ファ され だ 内 容 を 
FUNDUT パン チ 出 力 へ . 
OCH 』=“L | 入力 が Ctrl-L な ら ば , パッ ファ され だ 内 容 を 
LSTUMT |「 リ スト の の へ 、 
1AH =“Z 」 入力 が Ctrl-Z な ら ば , 本 プロ グラ ハム を 終了 レ , 
CC ピン M 人 へ 
と | リー ダ 入 力 テ デー ツタ の バッ ファ リン グ . 
に 最終 デー タ の 次 に , 邊 ず *00* を スト ア す る . 
音 
ら START+ さ 次 の デー タ 入 力 ヘ ルー プ . 
H。 BUFF ー 
A_M | パッ ファ カ ら 出力 デー タ の 取り 出し . 
Oo 。 (デー マツ が `00/ の 場合 "START'" へ の シャ ンプ . 
| 繰り 返し . 
START 
H | 
に C 。 4 1 ここ 
E_A リン チカ (の シス テ (。 コール 
oo ヨ 1 
OoOSH H, し 上 L レ ジス を 保護 し て いる . 
H 
H 。 
。 3 SS 
punnur。 ュ の テー タカ ルレ ルーズ 
2 | バッ ファ か カ ら 出力 デー タ の 取り 出し. 
_* 1{ データ が ^00* の 場合 YSTART" ヘ へ ジャンプ, 
0 | 繰り 返し . 
START | 
H # 
の いい リス トカ の シス テム コー ル 
k」 1 こう ーー 
4 | H, し レジ スタ を 保護 し て いる . 
日 ] 
H け 1 の 肖 2 
Te 々 出力 ヘル ー プ . 


入力 デー タダ の バッツ ノア の 始ま り . 


アダ ラム の PRN 形 式 ソ ー ス ・ リ ス え スト. 


シス テム ・ コ ー ル 徹底 実習 


ファ ンク ショ ン :3,4,5 実習 プロ グラ ム の 実行 


プロ グラ ム “3-4-5 . COM” を 起動 きせ 外部 か らい PUN : / プ バ イス ヘ へ デー タ を 送り 込み ます . 本 書 
の 場合 は もう 1 台 の CPM マシ ン か ら , 互い の RS-232C イ ンタ ー フ ェ イス (CCPHN 7 REDR :* 
両 デ バイ ス に 割り 当て られ て いる ) を 介し て デー タ を 送っ て いま す . 

Figure-2.2.4 は , デー タ 送 り 出 し 側 の 実行 例 で あり > 所 に より 。 キー ボー ド 入 力 を *PHN : *。 デ 
バイ ス か ら 出 力 し て いま す . 実習 プロ グラ ム \3-4-5 . COM/ が 起動 し て いる 受信 側 で は 。 この 出力 を 

"KRDR :” デバ イス か ら 入 力 し て , 各 動 作 が 行わ れる 訳 で す . 

Figure-2.2.5 は 。 実習 プロ グラ ム を 実行 し た 時 の スク リー ン の 表示 例 で あり . Figure-2.2.6 は 。LST :? 

デバ イス に 出力 され た 印字 例 で す . 


>PIPF PUN』 =CUNg) CON : (通常 は キー ボー ド ) 入 力 を \PUN : " ガ ら 出力 . 


人 ECDEF BHT J に LMN ) し F 

O12 さ 4567 ヨ 9 LF 

abcdefghi jk1mn/LF 

の し Ctrl し の 入力 に より , 上 記 デ ー タ を \LST : へ 出力 させ る . 

UPFQRSTUVMXY7Z ) し F 

7876S5432107LF 

OPT 5 モ uVwx yz し F 
2 Ctrl 一 P の 入力 に より , 上 記 デ アー マタ を *PUN ・ “へ 出力 させ る . 

Ctrl 一 Z の 入力 に より の , プロ グラ ム `3 -4-5/ を 終了 させ , 

こち ら の PIP も 終了 させ る . 


注 ) LF は ライ ン ・ フ ィ ー ド ・ キ ー の 入力 を 表す . LF は Ctrl-J で 代用 で きる . 


Figure-2.2.4 この 実習 で の デー タ 送 り 出 し 側 CP ン ZM マ シ ン の 実行 例 . 


仙 コー オー5/ 


> ーーCtTIーZ が 入力 され ね だ の で , CPM に 戻 つ だ . 


Figure-2.2.5 ファ ンク ショ ン : 3, 4, 5 実習 プロ グラ ム の 実行 例 . Figure-2.2.4 で の デー タ が 入力 
され る . 


RBCDEFGHIJELMN 
012 う 45567B9 
abcdefqh1 j ト 1 mn 


ッ ン 


Figure-2.2.6 の の > を 押 欄 ググ ほ ポ グ 和 ま ああ. 芋 放 2 ら ケ デ マオ ス へ の 出力 例 . 


の ノ 


全 シ ステ ム ・ コ ー ル 徹底 解説 


ファ ンク ショ ン : 6… ダ イレ クト ・ コ ン ソ ー ル 入出 力 


CALL 手 順 
入力 の 場合 
MV1 し 。 6 
MVI FE, 0FFH 
し ん し し 0005H 


邊 
(入力 デー タ は A レ ジス タ に 格納 され て いる ) 


出力 の 場合 

MVI 2 委 

に あこ プー ンー 

し 放し し 0005H 
機能 
E レ ジス タ に FEFH を セッ ト し て CALL す る 場合 は コン ソー ル 入 力 , FEFH 以 外 で あれ ば コン ソー ル 出 力 
と な る . 入力 の 場合 は 。 入力 が あれ ば 入力 デー タ を A レ ジス タ に 持っ て , CALL か ら 戻 る . 入力 が な い 
場合 は 。 A レ ジス タ に 00 を 持っ て CALL か ら 戻 る (入力 が ある まで 待た な いこ と に 注目 ). 
出力 の 場合 は 。 E レ ジス タ に セッ ト さ れ て いる デー タ を , コン ソー ル に 出力 する . いずれ の 場合 も , 
ファ ンク ショ ン 1 お よび 2 で 有効 で あっ た Ctrl-S, Ctrl-P な ど は 機能 し な い . 


実習 プロ グラ ム ファ ンク ショ ン :5 


コン ソー ル へ バー? 記号 を 連続 し て 出力 させ な が ら , コン ソー ル 入 力 を 監視 し , 入力 が あれ ば , 
その キャ ラク タ を コン ソー ル へ 出力 する . 入力 が Ctrl-Z で あれ ば 本 プロ グラ ム を 終了 し て CP ブ 


M に 戻る . 


この た 人 う あ = デ ウロ グ 芝 を 作っ て み 才 し ょ う 。 
この ブロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 湊 に 示し ます . 
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シス テム ・ コ ー ル 徹底 実習 


QR:TYFE 6.FRN / 


ーーーーーーーーーーーーーー ーーーーーーーーーーー ーー ーー ーーーー ーー ーー ーー ーー ーー ーー ニーー ーー ニー ーー ーー ーー ia 


H FUNCTIDN 6』 DIRECT CONSDLE :/ ロ 

ーーーーーーーー 
O10O DRG 10OH 

STARTs 
9100_OEQ6 MV じ 。 ら 6 | "ダイ レク ト ・ コ ン ソ ー ル 入出 力 * の "入力 "の 
O102 1EFF MVI E。QFFH |: シス テム ・ コ ー ル . E レ ジス タ に FFH を セッ ト 
O104 CDOSOG CALL OOO5H ンス ロコ スズ トン 内 部 で 
Q1Q07 B フ DRA A | 入力 (通常 は キー 入力 ) が あつ だ か どう か の 判 
Q1OB 215o 1 JN7 CHROUT に 入力 が あつ だ 場合 CHROUT* に ジャ ン 
O1OB OEQ6 MV1 に 、 | ダイ レク ト コン ソー ル 入 MM 力 の " 出 が の 
Q1OD 1E2D MV 1 E、 一 シス テム コール 一 記 答 を コン ンー ル に 
Q1OF CDO5QQ CALL ooo5hH | 出力 する (通常 は スク リー ン に 出力 ). 
0112 C さ OOO 1 JMF' START 最初 に 戻 つ て ルー プ . 

CHROUT : 
0115 FE1A CF 1 1 人 aH | 入力 が Ctrl-Z な ら 本 プロ グラ ム を 終了 し , 
O117 C8 RZ | CPM へ 戻る . 、 
O11H _OEQ6 MVI じ 。 ら 6 | ダイレクト コンソール 入出 力 * の "出力 "の 
O11aA 5F MOV E,a * シス テム ・ コ ー ル . 入力 キャ ラク タ を コン ソン 
Q11B CDO5QQ CALL Qoo5H 一 人 ル に 出力 する . 
O11E CSOOO1 JMF' START 最初 に 戻 つ て ルー プ . 
Q121 END 
AA> 


Figure-2.2.7 ファ ンク ショ ン : 6 実習 プロ グラ ム の PRN 形 式 ソ ー ス ・ リ スト . 


この アー ああ < リ スト か ちら アセ ンプ リ ・ ソ ー ス ・ ラ ァイル を 作り 、 "6。6COMY を 生 謀 し で ブ ョ グ 
全て で 交 ま し ょ う 。 
ファ ンク ショ ン : 6 実習 プロ グラ ム の 実行 

ブログ ラム “6. COM” を 起動 する と , スク リー ン に パー? 記号 が 連続 し て 出力 され ます の で ,。 適当 
に キー イン を 梨 う と 。 キー イン され た キャ ラク タ が 表示 され て 行き ます こめ の ズ ロ グラ ああ 感 。 キー 入 
力 を 監視 し な が ら , スク リー ン へ の 出力 を 連続 し て 行っ て いる 訳 で す . Ctrl-S, Ctrl-P の 機能 が 働か な 


いこ と も 確認 し て 下さ い 。 Ctrl1-Z を 入力 する と , プロ グラ ム を 終了 し て CPZ/M へ 戻り ます . 
この 実行 例 を 次 に 示し ます . 


ら 8 


全 シ ステ ム ・ コ ー ル 徹底 解説 


Figure-2.2.8 ファ ンク ショ ン : 5 実 者 デ ロ グ ラム の 実行 , 


ファ ンク ショ ン : 7 …IO バ イト の 取り 出し 


CALL 手 順 
MVI 上 。 
し も も 0005H 


加 
(IO バイ ト の 値 が A レ ジス タ に 格納 され て いる ) 
機能 
アド レス 0003H の IO バイ ト の 値 を , A レ ジス タ に 持っ て CALL か ら 戻 る . 


ファ ンク ショ ン : 8 …IO バ イト の セッ ト 


CALL 手 順 
MVI CO8 
(E) IO バイ ト の 値 
CALL 0005H 

機能 


ドレ ジス タ の 値 が 。 アド レス 0003H の IO バイ ト に セッ ト さ れる . 


B0 


実習 プロ グラ ム ファ ンク ショ ン :7.8 


シス テム ハ ・ コ ー ル 徹底 実習 


dhis 
プ ブログ ラム 実行 前 の IO バイ ト の 値 を コン ソー ル に 表示 し , 次 に . ロジ カル ・ デ バイ ス の \RDR : ? 
と PUN: に 。 それ ぞ れ フィ ジ カ ル ・ デ パイ ス 姜 ば 居 R1 | LBP1 ! ^ を 割 9 当 て: 割当 
て た 後 の IO バ イト の 値 を , 再び コン ソー ル に 表示 する . 
L Rs デュー 
この よう を な ブログ ラム を 作っ て み ま し しょう. 
この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 
A>TYFE 7-B.FRN/ ヽ 
エニ ーー ュ ブレ し し レレ 0 し し し に レレ 0 っ 00 0 に 0 つこ うう っ っ ---- 6 
3 FUNCTIDN 7: GET 1/ ロ BYTE 3 
。 B: SET 1I/ ロ BYTE | 
ーー ツー ンー で の トン アツ で イア アリ レレ し Do し し こし 20 5 
Q1QO ORG 10OH 
STARTi 
O10O CD45O1 CALL CRLFOUT --- 竹 帰 ・ 改 行 を コン ソー ル へ 出力 する サブ ルー チン . 
010 く OEO7 MVI じ 。Z7 | "IO バイト の 取り 出し "の シス テム ・ コ ー ル . 
O1Q05 CDO5OO CALL OOO5H | 現在 の IO バイ ト の 値 が レジ スタ に 得 ら れる . 
O1OB F5 PUSH PSM | 得 ら れ だ AQ レ ジス タ の 値 を 16 進 で コン ソー ル 
O109 CD2601 CALL HEXDSPLY | に 出力 する サブ ルー チン . 
O1OC F1 PUP PSM | レジ スヤ を 保護 し て いる . 
o1OD E6CS ANI 11woosOoe1 ig | (て に ⑯ レ ジス の "RORY と 
O1OF Fe628 QR 1 OO%10$10$O0OB | に UR1: と UP1: を セツ ソト する . 
O111 5F MV 用 CON. と LST: は 変化 させ な い . 
O112 QEOB MVI C,8 IO パイ ト の セッ ト * の シス テム ・ コ ー ル . 
Q114 CDOSQQO CALL OOOSH | 上 記 A レジ スタ の 値 が |O バ イト に セッ ツ ト さ れる . 
Q117 CD45O1 CALL CRLF ロ UT 復帰 ・ 改 行 を コン ソー ル へ 出力 . 
O11A OEO7 MV1 C。7 | い O バ イト の 取り 出し * の シス テム ・ コ ー ル . 
O11C CDOSOOQ CAL し し OOOSH | 変更 し だ |O バ イト を 取り 出し て 再 表 示さ せる だ め . 
$ 
O11F CD26O1 CALL HEXDSPLY - 変更 され だ IO バイ ト の 値 を 16 進 で コン ソー ル に 出力 . 
O122 CD4SO1 CALL CRLFOUT - 特 帰 ・ 改 行 を 出力 . 
O125 C9 RET 本 プロ グラ ム を 終了 レ ,CP ン M に 戻る . 
HE XDSPLY : 
O126 F5 、 PUSH F'SM | 
O127 OFOFOFOF RRC! RRC! RRC! RRC 
QO12B CD2FO1 CALL HOUT 1 | 
O12E F1 PDP PSM | 
O12F E6OF HOUT1s ANI OFH (レジ スタ の 値 を 16 進 で コン ソー ル に 表示 す 
O1 さ 1 C63O ADI OH 「 る サブ ルー チン 
O1 さ さ FE さ A CP1 さ AQH | 
O1 さ 5 DAS さ AO1 JC HOUT2 | 
O13 C607 AD1 フ 
O1 さ A CDSEQ1 HOUT2』 。 CALL CONOUT | 
O1 さ D C9 RET | 


6 1 


全 シ ステ ハム ・ コ ー ル 徹底 衣 説 


O1SE OEO2 EDNDUT』 MV に 
O140 5F MDV E。A | フアン ンション 2" の コン ソー ル 出 力 の サブ 
oO141 CDO5oo CALL ooo5H 0 ソー 
O144 C9 “ RET 
CRLFDUT : 
Q145 さ EOD MV1 A。ODH 
O147 CDSEO1 CA し CE ロ NOUT 
O14A EQA MVI A。OAH | 復帰 ・ 改 行 を コン ソー ル に 出力 する サブ ルー チン. 
O14C CDSEQ1 CEALL CDNDUT “ 
O14F C9 RET / 
oO15O END 
A> 
RDRAM お 2H63022002RRHRONR2H392OOROKRO 2 


Figure-2.2.9 ファ ンク ショ ン : 7。 8 実習 プロ グラ ム の PRN 形 式 ソ ー ス ・ リ スト 
この ソー ス ・ リ スト か ら ア セン ブリ ・ ソ ー ス ・ フ ァイル を 作り , “7-8 .COM” を 生成 し て プロ グラ 
ム を 実行 し て み ま し ょ う . 
ファ ンク ショ ン : 7.,8 実習 プロ グラ ム の 実行 


まず 最初 に 。STAT コ マン ド で 。 現在 の フィ ジ カ ル ・ デ バイ ス の アサ イン (割り 当て ) 状況 を 見 て 
お きま し ょ う . この 実行 例 を 次 に 示し ます ., 


A>STAT DEVs/ STAT コ マン ド で フィ ジ カ ル ・ デ バイ ス の 初期 の アサ イン 状況 を みる . 
CHN』 is UC1s 


RDRi is TTY 、 。 。 
PUNi 1 ぉ TTY』| し) (ある ここ に 目 . 


LGSTs 1s LFPTs 


> 


Figure-2.2.10 実習 プロ グラ ム 実 行 前 の 各 デ バイ ス の アサ イン 状況 を 見 る . 


ky の に DBE コマ ンド で 、 CT イキ 村 近 を デン プ し て おき ます 5 


( 0 パ 


ADDDT/) - DDT に よる 実行 前 の IO バイ ト 値 の 確認 . 
DDT VERS 2.2 
ー-DO。F / ーー アド レス 0--FH を ダン プ . 
OOQOO C さ Q さ DA 昌 ミ QO CS QQO BC FF OO FF QQO FF QOQ FF QQ  。。 = ーー スー ユー ス ユース ヨー スー スー スー 
ーー H 
2 IO バイ ト -、 
人 > 


Figure-2.2.11 実行 前 の DDT に よる IO バイ ト の ダン プ " 


こめ 


シス テム ・ コ ー ル 徹底 実習 


この よう に 。 " 民 BR : "、 PLN: “7 共に FV そま た 5 いま すす : 
で は , 実 間 プロ グラ ム 78. COM” を 実行 し て み ま し ょ う . その 実行 例 を 次 に 示し ます . 


ム > っ アー 日 / 実習 プロ グラ ハム の 実行 . NRDR ・ ヶ と PUN 2 ん に YUR4 4 2 UP4 4 ヶ / を アサ イン する . 


8 さ 実行 前 の IO バイ ト の 値 . 
AB 実行 後 の O バ イト の 代 . 


A> ( 注 ・ ご の プロ グラ ム を も う 一 度 実行 する 場合 に は , 事前 に , リセ ント ・ ボ タン に よる CP ン M の 再起 動 な ど で , 
IO バイ ト を 初期 値 に セッ ト し 直し て 下さ い . さも な いと 同じ 値 が 表示 され ます . ) 


Figure-8.2.12 。 ファ ンク ショ ン --7。-8-- 実 避 プ ログ ラム の 実 有 有 . 
この よう に , 実行 前 の IO バイ ト の 値 は “83H” で あり , 実行 後 は “ABH/ に 変更 きれ て いる こと が 
表示 され て いま す . 


83H 三 10000011…… FIZUMre-2.2、10 の アザ イン 。 
APBH ニ 10101011…… Figure-2.2.13 の デザ イン , 


この よう に , ブロ グラ ム の 目的 通り に IO バイ ト が 変更 きれ まし た が , これ を STAT コ マン ド で も 確 
材 し て み ま も ょ か 。 


人 ASTAT DEVs/) STAT コ マン ド で , 実習 プロ グラ ム 実 行 後 の 確認 を する . 
CUNs js UC1s 


RUDRI』 1)& UR1。 TTY ・->UR1 : 
PUN』 is UP1i TTY : up1 : | と 全 更 され て いる . 
に らら †T: :s し PT 


2 


Figure-2.2.13 実習 プロ グラ ム の 実行 後 の STAT コ マン ド に よる 結果 の 確認 
一 記 。 DD エコ マン ド で 。 1O バ イト 付近 を ダン プ し て み ま し ょ う ). 


>DDT / DDT に よる 実行 後 の I)O バ イト 値 の 確認 . 
DDT VERG 2.2 


MT ーー 0 一 FH を ダン プ 。 
QQQOQO C さ QG る 3 DA 。 20 し 3 00 お に FF 00 FF QO FF OO FF_ 00 。。.。。。。。。。。。。。。。 
ョ ーー [ 
IO バイ ト . ) 
> 


Figure-2.2.14 実行 後 の DDT に よる IO バイ ト の ダン プ . 


っ で 


全 シ ステ ム ・ コ ー ル 徹 克 懇 説 


目的 通り に アサ イン され て いる こと が 確認 され まし た . 
この ファ シク ショ シン 3 7 8 に より , ユー ザー・ プ ログ ラム 串 で ) 自由 に フィ ジ カ ル ・ デ パオ スズ の 
選択 が 可能 に な る 訳 で す . 


ファ ンク ショ ン : 9… 文 字 列 の プリ ント アウ ト 


CALL 手 順 
MVI た 9 
(D,E) で 文字 列 ア ドレ ス 
CALL 0005H 

機能 


友和 列 が 格納 きれ て いる メモ リグ の 先頭 アド レス を (D, E) レジ スタ に セッ ト し て CALL す る と , 文字 
列 の 最後 を 示す *$? 記号 (24H) が 来る まで , 文字 列 を コン ソー ル に 出力 する . 
Ctrl-S。 Ctrl-P。 タブ 処理 な どの コン トロ ー ル は , ファ ンク ショ ン : 2 と 同様 に 有効 で ある . 


実習 プロ グラ ム ファ ンク ショ ン :9 


プロ グラ ム を 実行 する と , Morning の M か , また は Night の N か を キー イン する よう メッ セー ジ 
が 表示 され る . 
そこ で ,M を キー イン する と GOOD MORNING……” と 応答 が あり , N を キー イン する と GOOD 


"と 応答 する 。 
Ctrl-Z を キー イン する と , プロ グラ ム を 終了 し て CPM へ 戻る . 


2 もつ o あ 208 ゲ ラム を 伯 っ で みあ み ましょ う 。 
この ブログ ラム の PRN 形 式 の ソー ス ・ リ スト を 湊 に 示し ます . 


A>TYPE 9.PRN/ 


こそ 2 


START 
O10O OEO9 MVI 
O102 113AO1 LXI 
oO105 CDoO5oo CALL 
Q108 OEO1 MVI 
O1OA CDOSoo CALL 
O1OD FE4D CPI 
O1OF CA2401 J2 
Q112 FE4E CPI 
O114 CA2FO1 5 
O117 FE1A CPI 
O119 CB RZ 
Q11A OEO02 MVI 
011C 1ESF MV 
O11E CDo5oo CALL 
O121 CSOOO1 JMP 
MONGOUT 
O124 OEO MVI 
O126 115EO1 LXi 
Oo129 CDO5oo CALL 
0O12C C さ OOO1 JMP 
NIGTOUT 
O12F OEO9 MVI 
O1 さ 1 118501 LXI 
O1 さ 4 CDO5Oo CALL 
O1 さ 7 C さ OOO1 _JMP 
O1 さ QA ODOA696E7O MSGINPk DB 


O1SE 
O185 


O1AA 


ODOAOA474F MSGMONG』 DB 
ODOAQA474F MSGNIBT』 DB 


END 


Figure-2.2.15 


シス テム ・ コ ー ル 徹底 実習 


C,9 文字 列 プ リン ト * の シス テム ・ コ ー ル : 

D。SBINF | て CDE) レジ スタ に , プリ ント ・ ア ウト する 

ooo5H 。 交 の 格納 / パッ ファ の アド レス を セッ 
る こと 。 


C。 1 

o6osH "コン ソール 入力 "の シス テム ・ コ ー ル . 

* 財 " [ い こ な W 3 へ で 2 いう 
CV [入力 が IM なら MONGOUT" へ ジャ ンプ 


*N* 1 W 4 に 、 N ec) へ 
_NIBTOUT | 入力 が N/ な ら *NIGTOUT 人 ジャ ンプ . 


1 人 AH =ー7Z | 入力 ガ OtrI-Z な ら 本 プロ グラ ム を 終了 し て 
1 CPM へ 戻る . 


2 入力 が ガ 上 記 の いずれ で も な い 場 合 ,* ゃ “を 

ド 。*?* / 出力 する コン ソー ル 出 方 “の シス テハ ・ 

QOOSH | コール. 

START -- 繰 り 返 し . 

7 | W ュ / /m こ ーー 

D。M88BMONS | 誠 列 プリ ント “の シス テム ・ コ ー ル . 

OOO5H | 文字 列 パ バッ ファ MSGMONG/ の 内 容 が 出力 され る . 
START 

C。9 

D,。MSBNIGT 千 に 

Fw | 文字 列 パ バッファ ^MSGNIGT” の 内 容 が 出力 され る . 


ODH,OAH。 "input 。 M)orning 。 or N)ight ーーー 
ODH, OAH, OAH。" GDOD MODRNING! THIS IS FUNCTION 9 。ODH。OAH 。′ 
ODH, ORH。 QAH。* GHOD NIGHT ! THIS IS FUNCTION 9 。QODH。 QAH 。” 征 ” 


- 文 寺 列 プリ ント の シス テム ・ コ ー ル に より , それ ぞ れ の 文字 列 / パ ッ フ ァ 


の 内 容 が *$”* が 来る ま で コン ソー ル に 出力 され る . 0DH は 復帰 , 0AH 
は 改行 の コー ド で ある . 


文 
| バ 
ウッ 
の 
アァ 
3 
リリ 
ジウ 


ファ ンク ショ ン : 9 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


この な て あ * ゃ が 放 ま か ら ア セン プリ ・ ソ ー ス ・ フ ァイル を 作り 。 パ 9.COMZ を 生成 て 。 プ な ゲラ 


ム を 捧 短 し て み ま 上 ょ う 。 


ファ ンク ショ ン : 9 実習 プロ グラ ム の 実行 


実行 例 を 次 に 示し ます . 適当 に , M や N, その 他 の 文字 な ど を キー イン し て 試し て みて 下さ い . 最 
後 は Ctrl-Z で CPM に 戻る こと が で きま す . 


^A>9) 実習 プロ グラ ム の 実行 . 
1nDut MM)orning 
BOOD MORNING 


ロビ 


1nDut MM)orning 


Or 
GOUDD NIGHT! THIG5 
input  M〉)orning 
1nput NM)orninq 
仙 > 


OF 
レ 


Figure-2.2.16 


N) i ght 
THIS IS FUNCTION 9. 
N) : ght 
IS FUNCTION 9. 


N) iq ロキ 
N) 1 gh キト 


ンー ルン あー の 


NN MI ゲ キー デイ SE: ミ 
プロ プラム の 方 答 . 
WW N "を キー イン . 
プロ グラ ム の 念 答 . 
スズ を キー イン ?( ガ 表示 され だ な. 


Ctrl-Z の キー イン に より , 本 プロ ブラ ム を 
終了 し て CPZM に 戻る . 


od 


ーー 一 >N 


9 実習 プロ グラ ム の 実行 . 


B5 


全 シ ステ ハム ・ コ ー ル 徹底 懇 説 


CALL 手 順 
MVI ね わ 衝 | チロ スロ (0AH) 
HDF 呈 ) パッ プア 学 F ス 
CALL 0005H 
如 
(入力 され た 文字 列 が , コン ソー ル ・ バ ッ フ ァ に 格納 され て いる ) 


機能 

コン ソー ル か ら の 入力 を , (D,E) レジ スタ に よっ て アド レス され る コン ソー ル ・ バ ッ フ ァ の 先頭 番地 十 
2 番地 か ら , 順次 , 格納 し て 行く . 
バッ ファ の 入力 可能 最大 文字 数 は 255 文 字 で あり , 入力 に 際 し て , RUB/DEL, Ctrl-C。Ctr|-E, Ctrl 
-H, Ctrl-]。 Ctrl-M, Ctrl-R, Ctrl-X な どの 各種 ラキ イン ・ エ ディ ッ テ ィ ング 機能 が 働く . 
CALL か ら 戻 る 条件 は 。 キャ リッ ジ ・ リ タン が 入力 され た 時 , ある い は "mx"” で 任意 に 設定 され る 入 
力 許可 文字 数 (上 限 は 255 文 字 ) と , 実際 に 入力 され た 文字 数 が 一 致し た と き で ある . 

コン ソー ル ・ バ パップ ファ の フォ ー マ ッ ト を 次 に 示す . 


0 E) レ ジス タ で アド レス され る コン ソー ル ・ バ ッ フ ァ の 先頭 番地 . 最大 255 文 字 ま で 可能 . 


mx… こ こ に , 入力 許可 最大 文字 数 ( | 一 255 の 間 で 任意 ) を, あらかじめ セッ ト し て お く . 
nc…CALL か ら 戻 っ た 時 に , 実際 に 入力 され た 文字 数 が セッ ト され る . 
Ci 一 Csss … 入 力 さ れ た 文字 が 格納 され る . 


実習 プロ グラ ム ファ ンク ショ ン : 10 医 


ファ ンク ショ ン : 10 の 機能 を 確認 する に は , コン ソー ル ・ バ ッ フ ァ を DDT の ロー ド に よっ て , 壊さ 
れ な い ア ドレ ス 2000H 以 上 の 適当 な 位置 に 設定 し , ファ ンク ショ ン : 10 を 実行 し た 後 , DDT で その コ 
ン ソ ツー ル ・ バ バッ ファ を ダン プ す れ ば 。 確認 する こと が で きま す : じ 友 し こと で は プ 下 人 ダ 形 合作 っ 
て , 前 述 の mx, nc の 値 と , c1 以 後 の 入 力 さ れ た 文字 列 と を 表示 させ て , その 働き を 見 る こと に し まし 
1 oy 


こ 1 


シス テム ・ コ ー ル 徹底 実習 


ン ジン プール 


KRE も 
と 表示 され , 再び プロ ンプ ト に 戻る . 
プロ グラ ム の 終了 は 。, 当 フ ァ ン クシ ョ ン の Ctrl-C 入 力 を 利用 し , リブ プー ト し て 終わ る . 


・ バ パッ ファ を アド レス 5000H に 設定 し , 入力 許可 文字 数 は 40 字 に 制限 し て お く . 
プロ グラ ム を 実行 する と , まず , 入力 を 促す プロ ンプ ト `*” が 出力 され , 続け て 適当 に 文字 
列 を キー 入力 し て 行く て . キ ャ リッ ジ ・ リ タン て 入力 を 終了 する と , コンソール ・ バ ッ フ ァ の 内 容 が 


C2…… (実際 に 入力 され た 文字 列 ) 


この よう な ヴ ョ ログ ラム を 作っ で て み ま し ょ う 
この 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 湊 に 示し ます . 


さ E2 日 
さ 20050 


CD7601 


QOEO2 
1E2A 
CDOSOO 


OEOA 
11005O 
CDOSOO 


CD7601 
CD76O1 


さる QOOSO 
CD5S7O1 
さ E20 

CD6FO1 
3 う QO15O 
CDS7O1 
さる E20 

CD6FO1 


人 A>TYPE 1O.FRN / 


5 FUNCTIDN 10: READ CUNSOLE BUFFER 有 
# ご ーーー ニ ーー ニー ニニ ーーーーーーーーーーーーーーーー デ テーーーーーーーーーーーーーーーーーーーー ニ ーー H 
DRG 10OH 
BUFF EQU SQOQQH 
MVi AA。4O | 入力 バッ ファ の TOP に 値 40( =28H) を スト ア . 
STA BUFF | 入力 バッ ファ を 最大 40 文 字 に 制限 する (255 字 まで 可能 ). 
START: 
CALL CRLFOUT --- 復帰 ・ 改 行 を 出力 . 
PVi 2 | コジ ツー 上 ルカ * の シス テム コー ル . 
HMVI |"* り を 表示 する , 
CALL OOO5H 
! | コー ル . パッ ファ へ の 入力 モー ド と な り , ライ ン ・ 
0 2 | 王 デ マツ ディング. る の 相 の コン トロ ー ル 、 キャラ 
に CALL OOQSH ) マガ 機能 する . 
CALL CRLFDUT | an 
CALL CRLFnuT 生 7 を 
LDA BUFF | 入力 パッ ファ の 1 文字 目 ( 入 力 許可 文字 数 ) を 
CALL HEXDSPLY | 16 進 表示 . 
MVI sw 。 
CALL CONnuT 「 バース を 出力 . 
LDA BUFF+1 | 入力 バッ ファ の 2 文字 目 (入力 され だ 文字 数 ) 
CALL HE XDSPLY | を 16 進 表示 . 
MV1 ーー 
CALL CONOUT 1 2 へ を 出 カ 


っ 


全 シ ステ ハ ・ コ ー ル 徹底 解説 
0O1 さ くさ 21025O LX 
01 さ 6 さ AQO15QO LDA 
0139 FEOOQO に じ P 
O13B CA4EO1 JZ 
QO1SE 47 MV 
DSFL Ys 
013SF CSES PUSH B! 
0141 OEO2 MV 1 
O14 さ SE MV 
QO144 CDOSOOQO CALL 
Q147 E1C1 POUF H! 
0Q149 2 く INX 
O14A 05 DCR 
O14B C2SFO1 JNZ 
O14E CD7601 まき CALL 
O151 CD76O1 CALL 
QO154 CSO5O 1 JMP 
HE XDSFLYs 
01 き 7 F ち 5 FUGSH 
O1S8 OFOFOFOF RRC ! 
QO15C CD6OO 1 CALL 
Q1SF F1 POF 
O16O E6OF HOUUT1s QANI 
QO162 C6 さ OO 人 DI 
O164 FE ささ AA . じ Pi 
O166 DA6BO1 J り に じ 
O169 C607 DI 
QO16B CD6FOQ1 HOUT2』 CALL 
O16E CC RET 
QO16F OEQ2 COUNOUUT 』 MV1I 
O171 ら 5F MOUV 
O172 CDOSQOQ CALL 
O175 C9 RET 
CRLFOUUTs 
O176 SEOD MV 
O178B CD6FO1 CALL 
O17B さ EOA MI 
O17D CD6FO1 CALL 
Q1BO C9 RET 
O1 昌 1 END 
仙 > 
Figure-2 .2.17 ププ ァ ン クジ ショ 


この ソー ス ・ リ スト か ら ア セン ブリ ・ ソ ー ス ・ フ ァイル を 作り , “10 . COM” を 生成 し て プロ グラ ム 


を 人 行 し て み ま せ じょう : 


5g 


RRC! 


H。 BUFF+2 
BUFF+1 


入力 され だ 内 容 を , 入力 され だ 文字 数 分 

で BUFF+ 1 」 の 値 ) 表 示す る . 

よ つ て 全体 の 表示 は , 

(入力 パッ ファ 最大 文字 数 )_ (入力 され だ 文字 数 ) 
_ (入力 され だ 内 容 ) と な る . 


PUSH H 
っ っ 
E。M 
OOQ5H 


POP B 


H 
B 
DBPLY 


CRLFODUT | 入力 こさ われ だ 内容 の 表示 が 終わ つた ら , 最初 か ら 


CRLFOUT 「 プ ログ ラム の 繰り 返し . 
GSTART 


PSM 
RRC ! 
HOUT 1 
PSM 
OFH 

さ OH 

さ QH 
HOUT2 
ズ 
CONUUT 


RRC 


(内 レジ スタ の 値 を 16 進 で 表示 する サブ ルー チン . 


| 半 、 
E。A |Q レ ジス タマ の キャ ラク タ を コン ソー ル に 出力 
OOQ5H | 9 る サン ルーチン , 


A。ODH 

CONOUT | 注 帰 . 改行 を コン ソー ル に 出力 する 
9 時 | サテ ル ーー チン: 

COUNOUT 


ン : 10 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


シス テム ハム ・ コ ー ル 徹底 実習 


ファ ンク ショ ン : 10 実習 プロ グラ ム の 実行 


実行 例 を 次 に 示し ます . 自由 に , 文字 列 を 入力 し た り , ライ ン ・ エ ディ ッッ リシン アダ な だ ジン ただ 
ー ル ・ キ ャ ラク タ を 入力 し た り し て 実験 し て み ま す . 


A>107 


% 人 ABCDEFG) を キー イン 、 


28 OZ7 ABCDEFG - 入力 され だ 内 容 . 
入力 され だ 文字 数 . 7 文字 入力 され た こと を 示し て いる . 
入力 パッ ファ 許可 文字 数 . 28H =40 字 (最大 255 字 可能 ). 
%O ひ 12 さく 456789VMXYZ / - を キー イン . 


28 OF O12 さ 456789VMXYZ = 入力 され だ 内 容 . 
15 文 字 入 力 さ れ だ こと を 示し て いる . 
^ へ R を キー イン (リタ イプ させ る ) い \#/ は CP /M の 方 答 . 
*abcdef ロ ロ fed#“ 
ーー ーー 4 回 RUBOUT を キー イ ~ 字 肖 ー リ っ 
ーー 4 回 を キー イン (4 文字 削除 . エコ ー. バ パッ フ さ れ て いる ). 
28 C さ abc - 入力 され だ 内 容 . 


結局 文字 入 字 され だ . 


*OUPQRGTU 要 
ーー 一 へ U り を キー イン . ヾ #/ は CP ン M の 応答 
2 OO 


を すべ て 削除 され て , 何 も 入力 され て いな い . 
ー !) を キー イン し て いな いこ と に 注目 


*12 さ 456789O12 さ 456789012 さ 456789012 さ 4567890 ーー 任 凍 の 文字 を 40 字 キー イン 入力 が 
ーーーーーー ニ ーー 三 ) ル rm ュー * 
設定 最大 文字 数 に 達する と , 自動 的 
2 2 日 12 く 4567B9O12 さ 4567B90 1 2 さ 456789012 さ 4567B90 に 入力 を 終了 する . 
28H=40. バッ ファ ガ フ ル に な っ つて いる こと ガ 分 か る . 


ーー 1 文字 自 に キー イン する と , Ctrl ー-C も 有効 で ある (2 文字 目 以 後 は 無効 ). 


> リプ ー ト し て CP ン M に 戻 つ だ . 


Figure-2.2.186 "ファンクション:10 実習 プロ グラ ム の 実行 例 . 


な お , この プロ グラ ム は , コン ソー ル ・ バ ッ フ ァ を 5000H に 設定 し て あり ます の で , Ctrl-C で リプ ー 
ト し た 後 (1 文字 目 に 入力 し な いと Ctrl-C は 有効 で な い ), DDT を 起動 し . 9000 量 から ダン プ し て コン 
ノー ル ・ バ バッファ を 直接 確認 する の も 良い で し ょ う . 

ご 2 イア ジグ シュ ョ ュ ン - ] 電 は , ライ ン ・ エ デア ディッチ スィ ング 機能 補 、 各 竹 コ ント ロー ルド キー に よる 
制御 が 有効 な の で , 応用 プロ グラ ム 上 で 文字 列 の 入力 に 用 いる と 大 変 便利 で す . 


こ }, 


全 シ ステ ハム ・ コ ー ル 徹底 懇 説 


CALL 手 順 
MVI C,。 11…… (=0BH) 
CALL 0005H 
2 


(結果 は A レ ジス タ に 格納 され て いる ) 


機能 
コン ソー ル に 入力 が あっ た か どう か の チェ ッ ク を 行い , 入力 が あっ た 場合 は A レ ジス タ に FFH を 持っ 
て CALL か ら 戻 る . 入力 が な か っ た 場合 は 00 を 持っ て 戻る . 


実習 プロ グラ ム ファ ンク ショ ン : 11 


コン ソー ル に , パー? 記号 を 連続 し て 出力 させ な が だ が ら コ ン ソ ー ル 入力 の チェ ッ ク を 行い , 入力 が 
あれ ば 。 その 文字 を コン ソー ル に 出力 し て “一 ” 記号 を 出力 し 続け る . 


入力 が ^S” の 場合 は , 次 に 何ら か の キャ ラク タ が 入力 され る まで 一” 記号 の 出力 を スト ッ プ 
する . 入力 が Ctrl-Z の 場合 は , プロ グラ ム を 終了 し て CPM に 戻る . 


9 ロロ ゲラ ム 才 相 y て みみ ま も ょ う . 
この 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


A>TYPE 11.FRN ! 


O100 


O1OO_QEO2 


ヽ コ ン ソ ー ル 出力 * の シス テム ・ コ ー ル . 
wo て ん 2 記号 を コン ソー ル に 出力 する . 
o1o4 CDoO5oo 


746) 


シス テム ・ コ ー ル 徹底 実習 


O1O7 OEOB MV に 、 14 | コン ンー ル ・ ス テー ツ ス の 取り 出し ^ の シス デム 

| oriog CDoSoo CALL ooosH ンー CC 
O1Q0C EZ 0RA 人 入力 が な い 場 合 は , 最初 の *START* へ ジャ ンプ 
O1OD Caooo1 JZ START | し て ルー プ す る . 

“コンソール 入力 * の シス テム ・ コ ー ル . 

Q11O OEO1 MVI C。1 上記 ル ー プ で 入力 が あれ ば ぱ ば , レジ スタ に 入力 

| O112 CDO5oOO CALL OOQOSH ルミ ンー ドー 同時 に コン ソー ル に 表示 
O115 FE1A CFPI 1AH 』=^Z | 入力 が Ctrl-Z な ら 本 プロ ブラム を 終了 し て 
O117 C 昌 RZ 「 CPM に 戻る . 
0Q11 昌 ロ FE5 さ CPI "S* | 入力 が "8" 以外 の 場合 は ,*START* に ジャ ンプ 
O11A C2oOQ1 JNZ START | し て ルー プ ざ ずる. ' 
OQ11D OEO1 MVi じ 。1 | 入力 が *S* の 揚 合 , この "コンソ ー ル 入力 * の 

| Q11F CDO5oo CALL ooo5H シス デム ・ コ ー ル に より , 入力 待ち と な る . 

| Q122 C さ OOQO1 JMP 'START ~ コン ソー ル 入 力 ガ が あれ ば , ヾ START> に 戻り 

| ルー プ す る . 

| O125 END 


\N、 人 > 


Figure-2.2.19 ファ ンク ショ ン :11 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト 


この ノース ・ リ スト か ら ア セン ブリ ・ ソ ー ス ・ フ ァイル を 作り . "11 . COM” を 生成 し て 。 プロ グラ 
ム を 実行 し て み ま し ょ う . 


ファ ンク ショ ン : 11 実習 プロ グラ ム の 実行 


実行 例 を 次 に 示し ます . 


SS まこ ーーーーー ツ ツー ツー ツーーーーー…ーーーー ニ ーー ニー ここ ここ ここ ここ 


ーー ニーーーーーーーーー ーーー ーーーーーーーーー ーー ニー ニーーーー ニ ーーー ーー ーー ーー で ーー トト の ここ ここ 
ーー ーー ーー ー… 


ーー ーー 


ーーーーーーーーーーーー ーーーーーー ーーーー ーー ーー ーーー… ーー ーー ーー ーー ーー ーーーーーーー ーーー ニ ーーーーーー ーー ーー ーー ーー ーー ーー ーー ーー ーーーーーー ーーーーーー ニ ーーーーーーーーーーーーーー…ー ーーーーー ニ ーーーー ニ ーーー ニーー 


タプ を キー イン (タプ は Ctrl-! で 代用 で きる ). 
ーー 人 ツ プ に よる スペ ー ス が 空い て いる . 


へ 
0 


5 や ー) 
\ 


ーーーーーーーーーーーーーーー…ー ーーーーーーーーー ーー ーー ーー ーー ーー ーー ーー ーーーーーーーーーーーー ーー ーー ーー ーー ーー ーー ーー ーー ーー ーーーー ーー ーー 


| Ctrl-Z を キー イン する と , 本 プロ グラ ム を 終了 し 。 
^S" を キー イン する と , 当 プ ログ ラム に より, キー 入力 待ち と な り  CP ン M に 戻る . 
*ー/ の 出力 が スト ッ プ する 、. 
次 に 何ら か の 文字 を 入力 する と バー^ の 出力 が 再開 され る . 


Figure-2.2.20 ファンクション :11 実習 プロ グラ ム の 実行 . 


ア 1 


全 シ ステ ム ・ コ ー ル 徹底 衣 説 


プロ グラ ム で 使わ れ て いる コン ソー ル 出 力 は , フ ァ ン クシ ョ ン : 2 を 使っ て いる の で , Cr-S に よる 
フリ ー ズ , Ctrl-P に よる プリ ンタ へ の 同時 出力 が 有効 で す の で 試し て 下さ い . “S”" に よる ーー 共生 2 か 
の スト ッ プ は , 当 プ ログ ラム に よる も の で す . 

この ファ ンク ショ ン : 11 は , 何ら か の プロ グラ ム を 実行 きせ な が ら , キー ボー ド か ら 入 力 が ある か 
どう か を セン ス し て 。 その 入力 キャ ラク タ に より , それ ぞ れ の 仕事 に 分 岐 させる,、 と いう よう な プロ ー 
グラ ム に 応用 で きま す . | 


CALL 手 順 
MVI 人 計 ツク Se4 ( 三 0CH) 
CALL 0005H 


3 

(結果 は HH レジ スタ お よび し レジ スタ に 格納 され て いる ) 
機能 
現在 起動 し て いる オペ レー ティ ング ・ シ ステ ム が , CPM で ある か , MP/M で ある か の 判別 を 行い , 
CPM で あれ ば , その バー ジョ ン No. を 知ら せる . 
CALL か ら 戻 っ た 時 。 HH レジ スタ が 00 な ら ば CP/M, 01 な ら ば MP プ M で ある こと を 示す . 
バー ジョ ン No. は, し レジ スタ =00 で あれ ば version2.0 以 前 の も の を 示し , 2.0 以 上 の バー ジョ ン の 場 
合 は 、 ル =20H で あれ ば version2.0, 22H で あれ ば version2.2 と いう 具合 に , 20Hー2FH ま で の 値 で 示 
され る . 


実習 プロ グラ ム ファ ンク ショ ン : 12 


現在 起動 し て いる オペ レー ティ ング ・ シ ステ ム が , CPM で ある か , MP/M で ある か , CP グ 
M な ら ば その バー ジョ ン No. は 何 か , を 表示 させ る . 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


テコ 


シス テム ・ コ ー ル 徹底 実習 


m vm で mm て ーー ce PT ee 5 oOGCSCGRSnaeooossryoecooot zen 
ンー 


< へ 
/ A>TYPE 12.PRN ヽ 
| 
りー ンー ウー ロロ ーー ロコ で ーー マー の イデー ジーーーーーーーーーーー ド ーーーーー ツ ーーー 5 
| 5 。 FUNCTIDN 12』 RETURN VERBIDN NUMBER ) 
ーー ニー ニン ーー マー で ーッ ャ ーーーーーーー ツ ーーーーーーーーー 5 
o1oo DRG 1ooH 
| START』s 
 Oloo QEOC V し 。 、、 ーー 
HU eno CALL。 83S。 | パー ジョ ン No. の 取り 出し * の シス テム . コ ー ル , 
| PT ” 8 | レジ スタ の 千 果 が 00 の 場合 は CP ン M 


DOPM ヘ ジ ャ ンプ 


O1OB CA1CO1 JZ CPM 
O1OB FEO1 CPi O1 則 レ ジス タ の 結果 が 01 の 場合 は MP /M_ 
O1OD CA1601 J7 MF'N *MPZM/ へ ジャ ンプ . 
O11O 117FO1 LXi D。 MSGANTR | ご ちら で も な い 場 合 は , 他 の シス テム な の で , 
Q1 1 さく CSS5OO 1 JMFP MSBOUT ]「SYSTEM= ANOTHER」 と 表示 へ . 

MPM: 
O116 1156O1 LX I D。MSBHPM | _._ ー 
0O119 C さ 5OO1 JMP BHT に の PFWEMP/ No と 表示 へ 

CPMNs 
O11C 11680O1 LX 1 D,。 MSGCPNM の OO 2 
OQO11F E5 FUBH H 2 で ビリ テ C ピ NM verslor) と 表示 へ | 

| し し 、 

O12 さ E1 POP H | の て 保護 し て いる . 
O124 7D MV A。 し る 
O125 FEOO CP Ii oO (レジ スタ ガ 00 の 場合 は , “VER1X"Y ヘ ジャ ンプ . 
O127 CA さ BO 1 コ 2 VER1x | ジヨン <.0 愉 前 . 
O12A FE2O CPI 2OH | (レジ スタ ガ が 20 の 場合 は VER20? ヘ ジャ ンプ 
O12C CA さ EO1 JZ VER20 「 バー ジョ ン 2 0 


O1<F FE22 CFI ぞ <2Z け | レジ スタ ガ 22 の 場合 は VER22? ヘ ジャ ンプ . 
O1 ミ 1 Ca4401 JZ VER22 (バー ジョ ン 2 25 
Q134 D24AO1 JNC VER22UP (レジ スタ ガ 22 以 上 の 場合 は すべ て , | 
0Q137 C ヒ 9 RET VER22up? ヘ ジャ ンプ . | 
VER1X』 
Q1 さ B 1192O1 し X】 D。MSB1X  - 1 
Q1 さ B C さ 5OO1 JMP MSGDUT | 「^- ご 表示 へ 
VER2O』 
Q13E 119BO1 し X 1 D。MBB2o ) - ー 
oO141 CSOO1 JMP MSGBOUT | ぐり ご 表示 へ . 
い VER つつ ミ 
Q144 119EO1 し X 1 D。MSB22 | ー 
O147 CS5oOo1 JMF MSBOUT ) < っ ご 表示 へ . 
VER22UF : 
O14A 11A401 LX 1 D, SG22UF _ 
Q14D C35oo1 JMP MSBOUT 2 UP と 表示 へ . 
MSGUUT s 
VO OFO ッ MV】 プー | い 文 字 列 の プリ ント "の シス テム ・ コ ー ル の サブ 
Q152 CDO5oQ FALL OOOS5H | ルー チン . て DE) レジ スタ に 文字 列 の アド レス 


QO155 C9 RET | を セッ ト し て CALL す る . 


ノ 3 


全 シ ステ ム ・ コ ー ル 徹底 解説 


O156 ODOQ5 さ 595 さ MSGMPM: DB ODH。 OAH。 BYSTEM = MP/M” 。ODH,OAH。” ま * 

O168 53595 く 5445 MSGCPM: DB >GYSTEM = CP/NM version ま * 

O17F 53545 さ 5445 MSBANTR: DB > GTSTEM = ANOTHER" 。 ODH。 OAH。" $" 

O192 さ 12E7BODOA MSB1X』 DB *1。x 。ODH。OAH。” 文字 列 エ リア . 

O198 さ 22E さ OODOA MSB20』 DB * つ 。O7 。ODH。 OnH。" ” 

O19E る 22E さ 2ODOA MSB22』 DB > フ 。2 ァ 。ODH。 OAH。” ま ” 

O1Q4 さ 22E さ 22O55 MGG22UP 』 DB * っ 、2 UP 。ODH。 OAH。" 

O1AD END ア 


0 ロト R 人 † ザ 人 1 ボ トレー ター ーー 
Figure-2 .2.21 ファ ンク ショ ン : 12 実 垢 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


上 記 ソ ー ス ・ リ スト か ら ア セン プリ ・ ソ ー ス ・ フ ァイル を 作り アン プル し 。 \12 . COM^ を | 戚 し 
て 実行 し て み ま し ょ う ). 
ファ ンク ショ ン : 12 実 習 プ ログ ラム の 実行 


CP ノ M の 各種 バー ジョ ン (一 般 的 に は , version 1.4/2.0/2.2) を お 持ち の 方 は 。 それ ぞ れ の バー 
ジョ ン に つい て 実験 する と 良い で し ょ う . 

まず 。 それ ぞ れ の バー ジョ ン の シス テム を 起動 し た 上 で , 実習 プロ グラ ム を 実行 し ます . シス テム 
が MP/M の 場合 は , 


SYSTEM = MP〆/M 


と 表示 し ます が ,CP/M の 場合 は , Figure-2.2 .23 の 実行 例 の よう に バー ジョ ン No. も 共に 表示 され ます . 


| し セツ に た | 1 十 2 の の あい 


48K CP/M ver 2.2ー CPM 起動 時 の オー プ ニ ン グ ・ メ ッ セ ー ジ . 
22/( 実習 プロ グラ ム の 実行 . 


GYSTEM = CP/M vers1iOn 2.2 


の > 注目 . パー ジョ ン No. ザ レポ ー ト され て いる . / 


シク 


ーー 


Figure-2.2.22 ファ ンク ショ ン : 12 実習 プロ グラ ム の 実行 . シ ステ ム が CPM version2 .2 の 場合 . 


了 v 許 レ て 了 て て て ヘー 


| (セッ ント | 
48k CP/M ver 1。4 ---CP ン M 起 動 時 の オー プ ニ ン グ ・ メ ッ セ ー ジ . 

人 A>12J --- 実習 プロ グラ ム の 実行 . 

SYSTEM = CFP/NMN version 1.x / 


谷 > 注目 . プ ログ ラム に より の , 2.0 以 前 は 1.X と し て レポ ー に され ね て いる . 


Figure-2 .2.23 ファ ンク ショ ン : 12 実習 プロ グラ ム の 実行 . シ ステ ム が CP/M yersion1.4 の 場合 . 


フ オ 4 


シス テム ・ コ ー ル 徹 辰 実習 


この プチ テン ダシ ジョ ン 2 は 例え ば , MP プ M で な けれ ば 実行 で き な い アプ リケーション ・ ブ プロ グラ 
ム と か , CPM の バー ジョ ン 2.0 以 上 で な けれ ば 実行 で き な い プロ グラ ム な ど に 応用 し て 。, 現在 働い て 
いる シス テム が , 適合 する か どう か の 判別 を 行わ せる 場合 に 使用 し ます . 


ファ ンク ショ ン : 13… デ ィ ス ク ・ シ ステ ム の リセ ッ ト 


CALL 手 順 
MVI に 電 で w ( 三 O0DH) 
CALL 0005H 

機能 


すべ て の ディ スク ・ シ ステ ム を イニ シャ ル 状 態 に セッ ト す る . つま り , すべ て の ドラ イブ は RW? 
と な り , DMA ア ドレ ス (後述 ) は 0080H の デフ ォ ー ル ト 値 に モッ ト さ れ , ドラ イブ A : が 選択 され る . 
だ だし, ログ イン ・ デ ィ ス ク は 変化 し な い の で , ファ ンク ショ ン : 13 を 実行 し た 時 点 の ログ イン ・ デ 
ィ ス ク が A : 以外 の 場合 は ,、 いっ た ん ドラ イブ A : が 選択 され た 後 , 元 の ドラ イブ に ログ イン され る . 


実習 プロ グラ ム ファ ンク ショ ン : 13 


ファ ンク ショ ン : 13 で 。 ディ スク ・ シ ステ ム を リセ ッ ト す る プロ グラ ム を 作成 する . 
プロ グラ ム が 実行 され た 時 , ディ スク ・ シ ステ ム が リセ ッ ト さ れ た こと を 知ら せる メッ セー ジ 
を 出力 させ る . 
この プログ ラム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


ーー ーーーーーーーーーーーーーーー ツ ーーーーーーーーー ーーーー ツ ーーーーーーーー 


0 トミ 
A>TYPE 13.PRN! 


9 
5 FUNCTIN 1 さ s RESET DISK SYSTEN 


o4oO - gpRe 10OH 


GSTARTs 
O1OO QOEOD 。 ' MI 13 04 ララ 00Ww 
O1O2 CDO5oQOQO CALL Ooo5H | シス テム ・ コ ー ル 
Q105 OEO5 MV ビ 。9 | ^ 文 字 烈 プリ ント * の シス テム ・ コ ー ル . 
O107 11OEO1 に メル 5 D, MSGRST ラベ ル *MSGRST/ の 文字 列 が プリ ント 
O1OA CDOSOO CALL ooo5H | あ アウト さ れる . 


フ ら 5 


全 シ ステ ハム ・ コ ー ル 徹 克 解説 


Q1OD C9 RET 
O1OE QDOA44495 さ MSGRST』 DB ODH。OAH。" DISk SYSTEM MAS RESET' 。ODH,OAH。" | 


Q128 END 


> / 


Figure-2.2.24 ファ ンク ショ ン :13 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


上 記 ソ ー ス ・ リ スト か ら ア セン ブリ ・ ソ ー ス ・ フ ァイル を 作り , アセ ンプ ブル し , “13 . COM” を 生成 
し 丘 王 覆 そま も すう 。 


ファ ンク ショ ン : 13 実習 プロ グラ ム の 実行 


一 度 ロ グイ ン さ れ た り ,。 何ら か の アク セス が 行わ れ た ディ スク ・ ド ライ ブ の ディ スケ ッ ト を 交換 し 
た 場合 , CPZM は 自動 的 に 異な っ た ディ スケ ッ ト で ある こと を 判別 し , その ドラ イブ を 書き 込み 禁止 
(R/O) に し て , ディ スク の デー タ が 破壊 され る の を 防ぎ ます . 

通常 この よう な 場合 は , Ctrl-C に よる リブ ー ト を 行っ て , シス テム 全体 の リセ ッ ト を 行っ て か ら , 
書き 込み を 伴う プロ グラ ム を 運用 する の で す が , この ファ ンク ショ ン : 13 を 使え 々 ば, リプ ブー ト を 行う 
こと な く ,。 ディ スク ・ シ ステ ム の リセ ッ ト を 行う こと が で きま す . “ 

その 実験 を 行っ て み ま し ょ う . ドラ イブ B : の ディ スケ ッ ト を 交換 し て , R プ O と な っ た こと を 確認 
し た 後 , ファ ンク ショ ン : 13 を 実行 し て み ま す . その 様子 を 次 に 示し ます . 


有 > の ょ に と 蘭 に 
(ドラ イブ A : 上 よ に 「19 COM" と YSTAT.COM"/ が ある . ) 人 
A>Bs) ドラ イブ B : に ログ イン (〈B : に は 適当 な ディ スケ ツ ト を セツ ト し て お ぐ ). | 
BB>AsSTAT /) STAT コ マン ド 実 行 . 

As R/M。 Spaces 197k し こ ーー 2 2 ・ 

Bi R/M。 Spaces 14k B: に も ログ イン し て いる の で , A : , B : 共に 表示 され る . ロン W 表 示 に 注目 . 

(ご ご で , ドラ イブ B : の ディ スケ ッ ツ ト を , 適当 な 別 の ディ スケ サッ ト と 入れ 替え る . ) 

B>DIR PIP.COUM) 入れ 替え だ ディ スケ ッ ト の ディ レフ トリ を 読み 込ま せる だ めじ に, 例え ば DIR コ マン ド を 実行 する . 

B: PiP COUN 

| 


B>AsSTAT / --- 有 度 STAT コ マン ド を 実行 . 


As R/M。 Spacei 197k 1 B: の R/W が ガ R/O と な つて いる ご こと に 注目 . 
Bs R/D。 Spacei 14k | 残り バイ ト 数 が 異な る ディ スケ ッ ト で ある の に 以前 の まま (14 k) で ある こと に も 注目 . 


B>As1 さ /  - 実 間 プログ ラム の 実行 . 


DISK SYSTEM MAS RESET 実習 プロ グラム に よる メッ セー ジ . フアン ンション ・ 13 が 実行 され だ . 


B>AsSTAT  -- 有 再度 STAT コ マン ド を 実行 . 


人 Qs R/M。 Space』 197 に B : の R ン O が R ン /W に リセ ッ ト さ れ , 入れ 替え だ ディ スケ ッ ト の 残り バイ ト 数 も 
Bs R/M。 Spaces 57k ト | 正しく 表示 され て いる . 


B> 


NN こ 


Figure-2.2.25 ファンクション:13 実習 プロ グラ ム の 実行 . 


4<) 


シス テム ・ コ ー ル 徹 克 実 習 


ファ ンク ショ ン : 14… デ ィ ス ク ・ ド ライ ブ の 選択 


CALL 手 順 

MVI C。 14…… (0EH) 

届 ) 。 一 ドラ イブ No (0= ニ A(。 1=B:、。 2= ニ CC(・…… ) 

CALL 0005H 
機能 
この ファ ンク ショ ン : 14 が 実行 され た 後 の 各 種 フ ァイル 操作 は , セレ ジス タ の 値 に よっ て 指定 され た 
に ド マイ 万 A : =00、 玉 ) 豆 朋 。、 と 1 02 "の だ KK ライ オン (で 和 われ る こつ まり . フ ァ ミク ショ ce S 製 
に よっ て 半 択 きれ た ドラ イブ が ,。 デフォー ルト ・ ド ライ デ と な る 、 新 し く 選 択 さ れ た ドラ イプ は 。。 当 
ファ ンク ショ ン に より 再選 択 が 行わ れる か , リプ ブート され る まで は 変化 し な い . 
ただし, ファ イル 操作 が 行わ れる ファ イル の ECB (ファ イル ・ コ ント ロー ル ・ ブロ ッ ク ) の 最初 の バ 
イト (ディ スク ・ ド ライ ブ ・ コ ー ド ) が “00” 以外 の 場合 は , その 値 に よる 直接 ドラ イブ 選択 の 方 が 
優先 し , ファ ンク ショ ン : 14 に よる 選択 は 無視 され る . 


ファ ンク ショ ン : 17… 最 初 の ファ イル ・ デ ィ レ クト リ の サー チ 


CALL 手 順 
MVI は 作 、 waw (は 是 ) 
(D, E) FCB ア ドレ ス 
CALL 0005H 


悪 

(結果 は A レ ジス タ に 格納 され て いる ディ レク ト ・ コ ー ド , お よび DMA バ ッ フ ァ に 格納 さ 

れ て いる ディ レク トリ 内 容 で 示さ れる ) 
機能 
(D, E) レジ スタ に セッ ト さ れ た FCB で 示さ れる ファ イル を ディ レク トリ か ら 捜 し 出し , 見 つか っ た 場 
合 は , 該当 ファ イル が 含ま れる ディ レク トリ ・ エ ント リ の 128 バ イト を DMA バ ッ フ ァ に 格納 する . そ 
の 場合 、A レ ジス タ に は , 0, 1, 2, 3 の いずれ か の 値 の ディ レク トリ ・ コ ー ド が セッ ト さ れ て お 
り , その 値 を 32 倍 (RLC を 5 回 行う )) する と , DMA バ ッ フ ァ 内 の 該当 ファ イル の ディ レク トリ 部 の 先 
頭 ア 〆 ド レス を 知る こと が で きる (DMA ア ドレ ス の 先頭 番地 十 人 レジ スタ の 値 X32= ニ 該当 ファ イル の デ 
ィ レ クト リ 先 頭 番地 ). 


か 4 


全 シ ステ ム ・ コ ー ル 徹 克 衣 説 


も し , FCB で 示さ れる ファ イル が 見 つか ら な か っ た 場合 は , A レ ジス タ に 255 (FEFH) が セッ ト さ れ て 
CALL か ら 戻 る . 


CALL 手 順 

MVI C,。 26 … (1AH) 

(D, E) ーーDMA ア ドレ ス 

CALL 0005H 
機能 
DMA (Direct Memory Address) は . ディ スク の すべ て の リー ド ノラ イト 操作 を 行う 場合 に 必要 な 
1 レコ ー ド (128 バ イト ) の 入出 力 バ ボッ ファ ・ エ リア の こと で あり , デフ ォ ー ル ト は アド レス 0080H に 
設定 され て いる . ディ スク へ の , どの よう な リー ドラ イト も , 必ず この DMA バ ッ フ ァ を 通し て 行わ 
れる . 
ファ ンク ショ ン : 26 に より , 任意 の アド レス に DMA バ パッ ファ を 設定 する こと が で き 。, 設定 され た アド 
レス は 。 当 フ ァ ン クシ ョ ン が 再度 実行 され る か , リプ ー ト され る まで は 変化 し な い . 


実習 プロ グラ ム ファ ンク ショ ン : 14, 17, 25 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 
ファ ンク ショ ン : 14, 17, 26 を 使っ て , DIR コ マン ド の 特定 ファ イル 名 サー チ (DIR x : fllename . 
ext) に 相当 する 機能 を , ユー ザー・ プ ログ ラム て で 実現 する . 

また , 見 つか っ た ディ レク トリ の DMA バ ッ フ ァ 内 の 位置 も 確認 し て みる (DMA ア ドレ ス は 4000 

時 に し て おく)。 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


人 Q>TYFE 14 一 1 フー26。 PRKN / 


4 ーーーーーーーーー ツ ーー ツ ーーーーーーーーーーー ニ ーー デーーーーーーー ニ ーー ニーーーーー デ ニン ーーー H 
9 FUNCTIDN 14: SELECT DISK H 
5 17』 SEARCH FOR FIRST 
5 26』 SET DMA ADDRES8 ' * 
$ ーーーーーーーーーーーーーーー EE 1 

O1QO DRG 1OOH 
GTARTs 

QtoOO OEQ9 MVI pf 

7 NN  。  /。 。 ( | * 聞 列 プリ ント * の シス テム ・ コ ー ル 。 

O105 CDo5oo CALL oOO5H ) 


メー 


シス テム ・ コ ー ル 徹底 実習 


O1OB OEO1 MV じ 。 1 


コン ソー ル 入 力 * の シス テム コール. 
O1OA CDO5oOo CALL OO005H ) キー ボー ドガ ら ド ライ ブ 名 A, B, O, を 入力 する . 
O1QOD E6OF ANI 09090w11138 | On ロ LM 6 = に 変 損 
O1OF さ D DCR ^ ム ( 
Q11O OEOE MV1 C。4 ま 」 
O112 5F MOV E。A | ディ スク ドラ イブ の 業 択 "(の シス テム コール 
O113 CDO5OQ CALL ooo5H | エー 人 人 力 ざ され だ ドラ イブ ガ が 選択 され る , | 
O116 OE1A MVI ビ 。 26 | _DMA ア ドレ ス の セッ ト *“ の シス テム - コ ー ル . 
O11 昌 11O0O4O LX 1 D。 4OOOH 「 プ フォ ルト は 80H で ある が , DDT で の 確認 ガ 可 
O11B CDOSoOO CALL OOO5H | 能 な よ うに 4000H に し て お ご . 
O11E OE11 MVI じ 。17 | "最初 の ディ レフ トリ の サー チ */ の シス テム ハ ・ コ ー ル . 
O12Q 115COO し レ メ 1 D。 OOSCH : この 例 で は , FCB ア ドレ ス は , デフ ォ ー ル ト の 5CH に 
O12 さ 3 CDOSoQoQo CALL QOQO5H  ) し て お ぐ . 
0126 FEFF CPI < らら | 琉 当 ファ イル が な い 場 合 は ヾ NAINAPE へ 
O12 昌 CA さ CO1 JZ ・NAINAI ジャ ンプ . 
QO12B O70707070 フ 7 RLC! RLC! RLC! RLC! RLC | 見 つ ひ か つ だ ファ イル の ディ レク トリ の 位置 を 
QO1 さ OQ さ 29O04O0 GTA 409OH アド レス 4090H に 格納 する (参考 まで に ). 
O1 マ くさ QOEO9 MV1 C。9 | 
O1 さ 5 118101 に X さ D。MSGAR』 “フラ イル あっ だ “の メッ セー ジ 出 力 . 
O1SB CDOS5oQOO CALL OOQOSH 
O1 さ B C9 RET 
NAINA1I 
O1 さ SC OEO9 MV C。9 ] 
QO1SE 116DO1 LXI D, MSGNAI ファ イル な い * の メ ツ セー ジ 出 力 . 
Q141 CDOSOO CALL QQQO5H 
O144 C9 RET 
O145 QODOA494E5O MSGINF』 DB ODH。 OAH。" INPUT DRIVE NAME ( Q。 B。 ビ 。.。.P ) ーー>$** 
O16D ODOAOA4649 MSGNAI』 DB ODH。 ONAH, QAH。 "FILE NATI! NAT! 7 。ODH。 QAH。* 
O1 昌 1 QDQAQOQA4649 MSBARI』 DB QDH, OAH。OAH。" FTLE ATTA! ATTA!” 、ODH。 OAH。" 
| O197 END 
呈 ポ フ 


FIgure-2.2.26 ファンクション:14, 17, 26 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


上 記 の ソー ス ・ リ スト か ら ア セン プリ ・ ソ ー ス ・ フ ァイル を 作り , ア セン プル し て ,14-17-26 . COM2* 
を 生成 し て 実行 し て み ま し ょ う . 


アメ ニ 


主 シス テム ・ コ ー ル 徹 辰 衣 


ファ ンク ショ ン 


は ダグ は 、 


に ョ 2 


・14. 17, 26 実習 プロ グラ ム の 実行 
次 の コマ ンド 形式 で 実行 され ます . 


14-17-26。,filename . ext J 


*\filename . ext に は ,。 ディ スク 上 に 存在 する か どう か を 調べ よう と する ファ イル の フル ネー ム を 
ーー オジ が も ます 。 

この コマ ンド を 実行 する と 。 どの ドラ イブ 上 の ファ イル を サー チ の 対象 と する か を 問い 合わ せ て き 
ます の だ ドラ イプ 各 の た 。 8 を,。… を キー イン し まず. 

結果 は , "あっ た ” と か “ない ?” と か 。 メ ッ セ ー ジ に より 表示 され ます . 


実行 例 を 次 に 示し ます . 


は. 


>14ー17 フ ー ジ 6 PLNX . CON / 


これ は , ドラ イブ B : 上 に ファ イル “PLMX . COM” が ある 場合 の も の で 


実習 プロ プラ ム を 実行 し て , ファ イル “PLMX. COM" を 捜す . 


INPUT DRIVE NAME ( A。 B。 C。。。。P ) -->A ーー ドラ イブ A : 上 に ある か 


FILE NAI! NAI! - A: 上 に は 存在 し な ガ つ だ . 


人 Q>14 一 1 フー26 PLNX.COM / 同様 に も う 1 度 実 行 . 


INPUT _ DRIVE NAME ( 人 NN。 


な で で スネ 


B。 C。。..P ) -->Bー ド ライ ブ B : 上 に は ある ガマ 


FILE ATTA! ATTA! B :・ 上 に "PLMX. COM" が あつ だ . 


人 A>DDT / DDT を 起動 . 
DDT VERS 2.2 

0 に NYC 
サ < 20 20 
OO 


400O 。XDIR 人 


。 PiP aa 


0 


・PLMLEX ・ し NM。 。 21 


9。。。 こ oo oo aaoe eee 


OO RLL RIN RS LE 


ご の よう に 設 当 ファ イル が 見 つつ だ 場合 は , II 
・ エ ント リ の 1286 バ イト 分 が , DMA バ パッ ソフ ア に 格納 さ 


この 値 , 40H は , FNC YE DMA ア ドレ ス +40H 
=4040H と な り , 該当 ファ イル ^PLMX. COM" の 位置 を 指し て いる こと が 分 か る . 


に 0 本 来 *43/= 文 字 の C で ある が , この ファ イル に RZO ア トリ ビュ ユー 
ト を 付け て ある だ め 最 上 位 bit が 1 に な り 43 つ C3 に な つて いる . 
Figure-2.2.27 ファ ンク ショ ン : 14, 17, 26 実習 プロ グラ ム の 実行 と , DMA バ ッ フ ァ の DDT に よる ダグ ンプ" 


シス テム ・ コ ー ル 徹 克 実 習 


も う 1 つの 実験 と し て “filename . ext” に ドラ イブ 名 を 付け , `^x : filename . ext′ と し て 実行 す 
本 を どう な ああ 要 上 に ょ う 。 
7x・ filename . ext" に 付け た ドラ イブ x : が 優先 し て , この 後 ド ライ ブ 名 入力 は , 何 を 入力 し て も 無 
視 さ れる こと が 確認 で きま す . 各自 試み て 下さ い . 


ファ ンク ショ ン : 15… フ ァイル の オー プン 


CALL 手 順 
MVI 18 の … (=0FH) 
(D, E) FCB ア ドレ ス 
CALL 0005H 
嘩 
(オー プン が 正常 に 行わ れ た 時 A レ ジス タテ 00 一 03。 オー プン が で き な か っ た 時 A レ 
ジス タテ 255 ニ FEF 是 と な る ) 
機能 
(①D, E) レ ジス タ で 示さ れる FCB ア ドレ ス の ファ イル 名 を , 該当 ディ スク 上 の ディ レク トリ か ら 捜 し , 
一 致す る ファ イル が あれ ば , その ディ レク トリ ・ デ ー タ (d0-dm フ ィ ー ル ド ) を メモ リ 上 の FCB に コ 
ピー し レ , 今後 の リー ドブ プラ イト 操作 を 可能 に する . この こと を ファ イル が オー プン され た と 言い , 正 
常に オー プン され た 場合 は ,A レ ジス タ に は 00 一 03 の 値 ( デ ィ レ クト リ ・ コ ー ド ) が セッ ト され て お り , 
も し ファ イル が 見 つか ら ず オー プン で き な か っ た 場合 は ,A レ ジス タ に は 255= ニ FFH が セッ ト さ れる . 
FCB の ファ イル 名 に , ファ イル ・ マ ッ チ 記号 “※?” お よび “?? を 使用 する こと も で きる . た だ し , 
ディ レク トリ 内 の 最初 に マッ チレ し た ファ イル が オー プン され る 。. 


ファ ンク ショ ン : 20… シ ー ケ ン シ ャ ル ・ リ ー ド 


CALL 手 順 
MVI に 。 20 … 4 
も) こま 月 デ ギ ビス 
CALL 0005H 
2 
(結果 は , FCB の “cr” フィ ー ル ド で 示さ れる レコ ー ド (128 バ イト ) が , DMA バ ッ フ ァ 
に 読み 出さ れる ) 


1 


主 シ ステ ム ・ コ ー ル 徹 必 解説 


A レ ジス タ が 00 の 時 は , リー ド が 正常 に 行わ れ た 場合 . 00 で な い 時 は , ファ イル が 終了 し 
た 場合 . ) 
機能 
(DE) レジ スタ で アド レス され る FCB が 示す , ファ イル の FCB 内 “cr フィ ー ル ド で 示さ れる 1 レコ 
ー ド (128 バ イト ) を 読み 出し て ,。DMA バ ッ フ ァ に 格納 する . “cr” の 値 は , 自動 的 に 1 だ け イ ンク リ 
メン ト さ れ , 決 の レコ ー ド を 示す よう に 更新 され る . 現在 の ロジ カル ・ エ クス テン ト (8 イン チ 標 準 
ディ スケ ッ ト で は 。16K バ イト が 1 ロジ カル ・ エ クス テン ト ) の リー ド が 終了 し , まだ ファ イル が 続く 
場合 は 。 自動 的 に 次 の ロジ カル ・ エ クス テン ト が オー プン され , “cr”" が 00 に セッ ト さ れる 。. 
この ファ ンク ショ ン : 20 を 実行 する に は , 事前 に FCB ア ドレ ス を 指定 し て ファ イル を オー ブン し , DMA 
アド レス を セッ ト し て お か な けれ ば な ら な い (DMA ア ドレ ス を セッ ト し な い 場 合 は , デフ ォ ー ル ト の 
80HーFFH が DMA バ バッファ と な る ). さら に , ファ イ ル の 最初 か ら リー ド を 行う 場合 に は , "cr" フィ 
ー ル ド を 00 に セッ ト す る 必要 が ある . 
1 レコ ー ド の リー ド が 正常 に 行わ れ た 場合 、A レ ジス タ に は 00 が 格納 され て お り , エン ド ・ オ プ ・ フ 
ァイル (ファ イル 終了 ) と な っ た 場合 は , 00 以 外 の 値 が 格納 され る . これ に より , ファ イル が 終了 し 
た を たこ : あ を 糞 @ る こと が で きる 。 
リー ド の み を 行う の で あれ ば , オー プン し た ファ イル は クロ ー ズ する 必要 は な く , その まま プロ グラ 
ム を 終了 し て よい . 


実習 プロ グラ ム ファ ンク ショ ン : 15,20 


アス キー・ フ ァイル を タイ プア ウト する TYPE コ マン ド に 相当 する プロ グラ ム を 作成 する . 
FCB ア ドレ ス は デフ ォ ー ル ト の 5CH, DMA ア ドレ ス は 特に セッ ト せ ず , デフ ォ ー ル ト の 80H を 使 
用 する . 


ーー ーー ーー ーー ニーー ニ ーー ーー ニーー ニ ーーーー ニ ーー ニーー ニ ーーーー ニ ーーーー ニ ーー ニーーー ニ ーーーーーーーーーーーーーーーーーーーーーーー ナ ー ーーーー 一 ーーq ぐ 


3 
5 FUNCTION 15 OPEN FILE 
5 2O』 READ SERUENTIAL 5 


GSTARTs 


こと アス 


シス テム ・ コ ー ル 徹 克 実習 


O1QO_OEOF MVi C。15 | ヾ フラ イル の オー ブン * の ファ ンク ショ ン ・ コ ー ル . 
QO102 115COO LX 1 D。OO5CH : この 例 で は , FCB ア ドレ ス は デフ ォ ー ル ト の 
QO1Q5 CDOSoOQO CALL QooOQSH |5CH 番 地 に し て お こぐ. 
O10B FEFF CP1 2 っ 55 ) 政 当 フ ア デイ ル が 存在 せ ず , ファ イル の オー プ 
Q1OA CAS101 7 DPNERR プ ガ で き な か が っ だ 場合 は ヾ OPNERR” へ ジャ 
ン ン 9 る 。 
O1OD AF XRa Aa 0 と と 0 ペー 
Q1OE 327COO + ミ っ 「 ン シャ ル ・ リ ー ド に 備え て , FCB の cr フィ ー ル 
ちの の PH+ き る ーー に GGH-r 2 番地 ) を 0 に する 
NXTRECs 
Q111 OE14 MV1 C。2O |、。、 ーー ーー 
O116 CDO5OO CALL OoQOS5H 。 
119 FEOO P 0) 」 プア ァイル の 最 が 来 だ お かど うか の チエ ッ フ . 
) 本 プロ プラ ハム を 終わ り , CP ^M に 戻る . 
| Q11C 21OOO LX 1 H。 OOBOH シー ケン シャ ル ・ リ ー ド の だ め の DMA バ ッ フ 
| SCROUT s は , デフ ォ ー ル ト の 80H 番 地 で ある . 
O11F QEO2 MVI じ 、 う ' 
O121 SE MV E。M DMA パ ッ フ ァ に 格納 され て いる 1 レコ ー ド 
Q122 E5 PUSH 昌 (428 パ バイト) ご と の ファ イル 内 容 を , 次 々 と コ 
O123 CDO5QQ CALL QQQO5H ン ン ノー ル に 軸 力 する. 
Q126 E1 POP H 
0127 2 さ 1NX H ] 
| ot2g zD MOV AA 128 パ バイ に を コン ソー ル に 出力 し 終え だ か の チ 
ます アフ 8 8 So 2 SR => 
37 00 xy | 終え だ ら , 次 の レコ ー ド を リー ド す る だ め , 
Q12B C21FO1 JNZ SCROUT | VNXTREC7 ジ ャ ンプ する 、 
Q12E C さ 1101 JMP NXTREC 
DPFNERR: 
O1 さ 1 OEO9 MVi じ 。9 | 該当 ファ イル ガ 存 在 し て いな いな ど で , フ 
OQ1 さ る さ 1 1 さ AO 1 LXI D。 MSGERR | イル が オー プン で き な か ガ つ だ 時 は バフ ァイル 
Q1 さ 6 CDO5OO CALL QOO5H | が な い “ の メッ セー ジ を 出力 する . 
O1 さ 9 C9 RET 
O1 さ QA ODQOAOA4649 MSGERR: DB ODH。 QAH。 ORH。"FILE BA NATI' 。ODH。OAH。" ま * 
O1 4B END 
合 > 
Figure-2.2.28 ファ ンク グ クション : 15, 20 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ サ スト . 


上 癌 ジー ズ ェ は 共 上 か ら ア モン プリ ・ ょ ソース ・ フ ァイル 作り 。 ア セン ブル し 。 5720 、COM” を 


生成 し て 実行 し て み ま し ょ う . 
ファ ンク ショ ン : 15, 20 実 習 プ ログ ラム の 実行 
この ブロ グラ ム を 実行 する た め の コ マン ド 形 式 は , 
15-20x : filename . ext / 


で あり TYPE コマ ンド と 同様 で す . 


ご 3 


主 シ ステ ハム ・ コ ー ル 徹 克 衣 説 


次 に , 自分 自身 の ソー ス ・ フ ァイル “15-20 . ASM” を タイ プア ウト する 実行 例 を 示し ます . 


oct が 


人 A>15-2O 15-20。ASM ) ロブ イン ・ デ ィ ス ク 上 の 自分 自身 の ソー ス ・ フ ァイル ^15 -20.ASM* を 


タイ プア ウト する . 

, ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ニ ーーーーーー 5 
5 = FUNCTIDN 15』 DPEN FILE 5 
5 20』 READ SEBUENTIAL 。 
# ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 5 

ORG 10QH 
STARTi 
MVI C,。15 
Lx 1 D。 OOSCH 
CALL OOO5H 
CFI 255 
| 5 DPFNERR 
| TYPE ゴ コマ ンド と 同様 に , ジス キー・ フ ァイル が 
タイ プア ウト され て いる . 
JNZ SCROUT 
JMP NXTREC 
FNERRs 
MVI C。9 
LX 1 D。 MSGERR 
CALL OOQo5H 
RET 


MSGERR: DB QODH。OAH。 OAH。" FILE BA _NAI' 。ODH。 QAH。” ま ” 


END 
> 


Figure-2.2.29 ファ ンク ショ ン :15,。 20 実習 プロ グラ ム の 実行 例 . 


A>15 ラ ー2O0 Bs 15-20。ASN ) ドラ イブ B : 上 の ファ イル “15 一 20.ASM" を ダイ プア ウト する . の 
FILE BA NAIi 該当 フタ イル は ドラ イブ B : 上 に は な か つ だ . 


人 > 


Figure-2.2.30 指定 し た ファ イル が 存在 し て いな か っ た 場合 . 


タイ プア ウト し よう と する ファ イル の 頭 に , 任意 の ドラ イブ 名 を 指定 する こと が で きま す の で , 試 
みて 下 き い 、. 
注 ) タイ プア ウト され た ファ イル の 最後 に . スク リー ン が クリ ア さ れ て し まう こと な ど が あり ます 
が , これ は , 当 プ ログ ラム の 人 簡素 化 の た め に , ファ イル の 最終 の デー タ ~ 1 AH を 検出 せ ず に , 
これ 以 隆 も 最終 レコ ー ド の 128 バ イト を 全部 スク リー ン に 出力 し て し まう た めで す . 


こち と! 


シス テム ・ コ ー ル 衝 底 実習 


ファ ンク ショ ン : 16… フ ァイル の クロ ー ズ 


CALL 手 順 


MVI し 、 1 な 5… (= テ 18H) 
(D, E) 一 FCB ア ドレ ス 
CALL 0005H 


内 

(ファ イル の クロ ー ズ が 正常 に 行わ れ た 場合 、 A レ ジス タテ 0, 1, 2。 3 の いずれ か で 

ある . クロ ー ズ し よう と する ファ イル が な い 場 合 は , A レ ジス タニ 255=FFH と な る ) 
機能 
ファ イル の オー プン (ファ ンク ショ ン : 15)。 ある い は ファ イル の 作成 (ファ ンク ショ ン : 22) の ファ 
ンク ショ ン が すでに 実行 され て お り , FCB で 示さ れる ファ イル に 何ら か の 書き 込み が 行わ れ た 場合 
デー タダ は ,。 その つど ,。 1 レコ ー ド ずつ ディ スク に 書き 込ま きれ て 行く が ,。 ディ スク ト 上 の ディ レク トド 思 者 
に 関し て は , 何 も 更 新 さ れ て いな い . そこ で 書き 込み 操作 を 全部 終了 し た 最後 の 時 点 で , クロ ー ズ ・ 
ファ ンク ショ ン を 実行 し , 現在 の メモ リ 上 の FCB の 内 容 を ディ スク 上 の 該当 ディ レク トリ に 書き 込み . 
ディ レク トリ を 更新 し て , 新しい ファ イル と し て 完成 きせ な けれ ば な ら な い . 読み 出し の み の フ ァ イ 
ル 操 作 で は ,、 オー プン し た ファ イル を クロ ー ズ する 必要 は な い . 
クロ ー ズ の ファ ンク ショ ン が 正常 に 行わ れ た 場合 ,A レ ジス タ に は , ディ レク トリ ・ コ ー ド の 0 {. 
2, 3 の いずれ か の 値 が 格納 され て いる . クロ ー ズ する ファ イル が 存在 せ ず , クロ ー ズ で き な か っ た 
場合 は , A レ ジス タ は FFH が 格納 され て いる . 


ファ ンク ショ ン : 19… フ ァイル の デリ ー ト 


CALL 手 順 
MVI mn ( 三 13H) 
(①D, E) FCB ア ドレ ス 
CALL 0005H 


交 
(該当 ファ イル の 削除 が 行わ れ た 場合 は , A レ ジス タニ 0, 1, 2。 3 いずれ か の 値 が 格 


納 さ れ て お り , 該当 ファ イル が な か っ た 場合 は ,、 A レ ジス タニ = テ 255=FFH と な る ) 
機能 
(①D, EE) レジ スタ で アド レス され る FCB が 示す ファ イル を ディ スク 上 か ら 削 除 す る . ファ イル 名 に は 


こ 1 


全 シ ステ ム ・ コ ー ル 徹 辰 解説 


ファ イル ・ マ ッ チ 記号 *?? や **? を 使用 する こと が で きる . また , ドラ イプ ・ コ ー ド dl に ド 
ライ ブ No. を 指定 する こと に より , 任意 の ドラ イブ 上 の ファ イル を 削除 する こと が で きる . 

該当 ファ イル が 削除 きれ た 場合 は , A レ ジス タ = テ 0, 1, 2, 3 の , いずれ か の ディ レク トリ に ・ コ ー 
ド が 格納 され て いる . 該 当 フ ァイル が 存在 せ ず , 削除 が 行わ れ な か っ た 場合 は ,A レ ジス タニ 255 ニ FFH 
が 格納 され て いる . 


ファ ンク ショ ン : 21 シーケンシャル ・ ラ イト 


CALL 手 順 

MVI に 4 まい ツン (15 日 ) 

(D, E) FCB ア ドレ ス 

CALL 0005H 

に 

(書き 込み が 正常 に 行わ れ た 場合 , A レ ジス タテ 00, ディ スク が フル で 書き 込み が で き な 

か っ た 場合 は 。 A レ ジス タ は , 00 以 外 の 値 が 格納 され て いる ) 
機能 . 
ファ ンク ショ ン : 20 の シー ケン シャ ル ・ リ ー ド と , 逆 の 動作 を 行う . 
あか の EET 
バッ ファ の 128 バ イト が 書き 込ま れる . “cr” の 値 は 自動 的 に 1 だけ イン クリ メン ト さ れ , 次 の レコ ー ド 
の 書き 込み に 備え られ る . 
二 2 ス ル ・ そ ぶす だ す 衝 せま ん 1 た クト まり 人 還 す うく の 生 の 
16K バ ベイト) が フル に な っ た 場合 (*cr* が オー バ ・ フ ロー し た 場合 ), 自動 的 に 次 の ロジ カル ・ エ クス 
テナント が オー プ ズン され, 人 
当 フ ァ ン クシ ョ ン : 21 を 実行 する に は , 事前 に パフ ァイル の オー プン ” ある い は “ファ イル の 作成 " 
ファ ンク ショ ン を 実行 し て お か な けれ ば な ら な い . 
書き 込み が 正常 に 行わ れ た 場合 ,A レ ジス タ に は 00 が 格納 され て お り , デ ィ ス ク が フル に な り , 書 き 込 
み が で き な か っ た 場合 は 、 A レ ジス タ に は 00 以 外 の 値 が 格納 され て いる . 


ファ ンク ショ ン : 22… フ ァイル の 作成 


CALL 手 順 
MVI C, 22…… (16H) 
(D, E) で FCB ア ドレ ス 
CALL 0005H 
和 


こ 1) 


シス テム ・ コ ー ル 徹 辰 実習 


(ファ イル の 作成 が 行わ れ た 場合 は , AA レジ スタ テ 0, 1, 2, 3 の いずれ か ,。 作成 が で 
き な か っ た 場合 , A レ ジス ター255=FFH が 格納 され て いる ) 

機能 

(D, E) レジ スタ で アド レス きれ る FCB 上 の ファ イル 名 を 持つ ファ イル (内 容 は まだ 空 ) を 作成 する . 
つま り , 新 フ ァイル の ディ レク トリ を ディ スク に 登録 する . 

作成 し よう と する 新 フ ァイル 名 は , 同一 先生 0 ング は 
な い .。 ファ イル 名 が 同じ も の が 2 つ で き て し まい , お か し な こと に な っ て し まう . この よう な こと を 
避け る た め , PIP や SAVE コ マン ド で 経験 きれ て いる よう に , 通常 は すでに 存在 する ファ イル と 同一 
名 の ファ イル を , 事前 に ファ ンク ショ ン : 19 で 削除 し て か ら .。 > ファ イル の 作成 ? を 実行 する . ある い 
は , ED で 行わ れ て いる よう な ファ イル 名 の エク ステ ン シ ョ 2 ~。$$$8 や “. BAK′ な ど に 変更 す 
る の も よい . 

当 フ ァ ン クシ ョ ン を 実存 し て 。 ファ イル の 作成 が で きた 場合 は 、,、 A レ ジス タ に は , 0, は 
ずれ か が , また , ファ イル の 数 が 制限 いら っ ぱい で ファ イル が 作成 で き な か っ た 場合 は , 255 ニ FEFH が テ 
イィ レク トリ り ・ コ ー ド と し て 格納 され る . 

"ファ イル の 作成 に より ファ イル が で きる と , その ファ イル は すでに オー プン され た 状態 に あり 
自由 に リー ド プ ノラ イト 可能 で ある パフ ァイル の オー ー プ ブン "の ファ ンク ショ ン を 再度 実行 する 必要 は な い . 


実習 プロ グラ ム ファ ンク ショ ン : 16,19, 21, 22, (20) 
PIP コ マン ド に 相当 する よう な , ファ イル ・ コ ピー の プロ グラ ム を 作成 する . 


PIP は 一 度 に 16K バ イト 分 ディ スク か ら 読 み 出し バッ ファ リン グ す る が , 当 プ ログ ラム で は ド 玉 
コー ド (128 バ イト ) ずつ の 読み 出し - っ 書き 込み ′ を 行い な が ら コ ピー を 進め る . 


ッッ グ 癌 グラ ム の PRN 形 式 の ソー ス ・ リ スト を 決 に 示し ます . 


ノ 


全 シ ステ ハム ・ コ ー ル 徹底 解説 


こ 1 こ ) 


O1OO 
O102 
O105 
O108 
O109 
Q10A 
O1OB 
O10C 
oO1OD 


O11O 
O112 
O115 
O118 
O1 1 


O11D 
O11F 
O122 


O125 
O127 
O1 2A 
O12D 
O12F 


O1 さ 2 
O1 ささ 
O1 さ 6 


O1 さ 39 
O13B 
O1 さ SE 
O141 
O14 さ 


O1 46 
O1 48 
O14B 
O14E 
O1S5O 
015 さ 


O156 
O159 


O15C 
O1SF 


O162 
O165 


O1 6 日 
O16 人 
O16D 
0O170 
O172 


0O175 
O178 


O17B 


OE 1O 
216COO 
11FFO1 


OEOF 
11FFO1 
CDOSQO 
FEFF 
CaAS60 1 


OE 1 さ 
1 1SCOO 
CDQSQO 


OE16 
3115SCOO 
CDOSOO 
ココ スコ 
CASCO1 


AF 
さ 21FO2 
さ 27CQO 


OE14 
11FFO1 
CDOSQO 
FEOO 
C26801 


OE15 
1 1SCOQ 
CDOSOOQ 
FEOO 
C26201 
ささ 901 


11 コ 401 
に さ 7EO1 


119CO1 
C さ 7EO1 


1 1BAO1 
に さ 7EO1 


OE1O 
11S5COO 
CDOSOO 
FEFF 
CA7BO 1 


11E901 
C さ 7EO1 


11D1O1 


STARTs 


FCBB* ま MOVs 


NXTRECs 


OFNERRi 


MAKERRs 


MRTERRi 


CPYENDs 


CLSERRs 


MVi 
LX 1 
LXI 
MOV 
STAX 
INX 
INX 
DCR 
JNZ 


MV 
LXI 
CALL 
CP1 
JZ 


MV1 
LX1 
CALL 


MV1 
LX1 
CALL 
CP 
JZ 


XRA 
STA 
STA 


MVi 
し LXI 
CALL 
CPI 
JNZ 


MV 1 


LXI 
CALL 


し LXI 


C。10H 


H。FCBWD+10H 


D,。FCB$ ら 


CER ら 5* ト MOV 


C。15 
D,。FCB$ ら 
QOO5H 
255 
DPNERR 


C。19 
D。FCBWD 
OOQ5H 


。 22 
D,FCB$D 


QOQOSH 


255 
MAKERR 


は] 
FCB$ ら 5+ さ 2 
FCB を D+ さ 2 


C。 2Q 
D, FCB*8 
OOOSH 


O 
CPYEND 


D, MSGSER 
MBGUUT 


D , NBBNER 
MSG0UT 


D, MSGMER 
MSBOUT 


ビ 。 16 
D。FCB$D 
OOO5H 
255 
CLSERR 


D, MSGEND 
MSGOUT 


D。MSGCER 


アド レス 5CH か ら の FCB 内 の セカ ンド ・ フ ァ 
イル 名 (アド レス 6CH か ら 格 納 さ れ て いる ) 
を , ソー ス 側 の FCB ア ドレ ス に 転送 


ソー ス 側 の FCB で 示さ れる ファ イル を オー プ 
ン す る オー プン レ し よう と する ファ イル が な 
い 場 合 は , “OPN ERR" へ ジャ ンプ . 


FCB で 示さ れる ファ イル と 同一 名 の ファ アイ 
ル が 存在 し て いれ ば ぱ , その ファ イル を 削除 す 
の 、 


デス ティ ネー ショ ン 側 の FCB で が され ね る プ 

ァイル を 新 だ に 作成 する (と 同時 に , オ ー ブ プン 

状態 に な る ). ファ イル 数 が 制限 いつ ば ぱい の 
合 は MAKERR" ヘ へ ジ ヤ ン プ . 


| デス ティ ネー シヨ ン 側 ( 新 し く 生成 する 側 ) の 


画廊 の FCB の レコ ー ド * y 2 8 に Ccr/ フ ィ ー 
ルド ) を 00 に セッ ト す る . 


ソー ス ・ フ ァイル を 1 レコ ー ド 鞍 み 出す . DMA 
ラド レス は デフ オォ ー ル ト 値 の 80H で ある の で 
読み 出さ れ た デー マツ は 80HーFFH に 格納 され 
| る 。 フ ァイル ・ エ ンド に な っ だ 場合 は *CPY 


END/ へ ジャ ンプ . 


| DMA バ パッ ファ の 1 レコ ー ド 分 を ディ スク に 書 
き 込 む 。 ディスク が フル に な っ て 空き ま ス ペー 
| スガ な い 場 合 は .*WRTERR/ ヘ ジ ヤ ン プ 」 


ーー 次 の レコ ー ド の 読み 出し ヘル ー プ . 


ソー ス - フ ァイル が な い 場 合 の エラ ー・ メ ツ セ 
ー ジ 軸 、 


ファ イル の 数 が 制限 いつ ぱい の 場合 の エフ ー 
・ メ ッ セ ー ジ 出力 . 


ディ スク が ガ フ ル に な り , 空き エリ ア が な い 坦 


合 の エラ ー・ メ ッ セ ー ン . 


ティ ネー ショ ン ・ フ ァイル を フロ ー ズ する . 
2 ー ズ で き な い 場合 は , ^CLSERR" ヘ ジ ヤ 
ンク 


| 
| 
PNG 
| コビー 作業 終了 の メッ セー ジ 出力 


クロ ー ズ ・ エ ラー の メッツ セー ジ 出 力 . " 


シス テム ハム ・ コ ー ル 徹 必 実 泊 


| 
MSGOUT』 | 
O17E OEO9 MVi じ 。9 
O18O CDOSOO CALL OOQSH ( メ ツ セー ジ 出 力 の サブ ルー チン . | 
O1B さ C9 RET 


O184 ODOAOA5 さ 4F MSGSER』 DB QDH,OAH。 QAH。" BDURCE FILE GA NAI" 。ODH。 ORH。: * 

O19C ODOAOA4649 MSGBMER』 DB ODH。 QAH, OAH。 FILE DIRECTORY GA MANPAI' 。ODH。 OAH。" | 
O1BA ODOAOA4449 MSBMER: DB ODH,。 OAH。 OAH。" DISK SPACE BA NATI' 。ODH。OAH。' | 
O1D1 ODOAOA4649 MSGCER: DB ODH, OAH。 OAH。"FILE CLOSE DEKINAT* 。ODH。 OAH。" も > 
O1E9 ODOAOA4 さ 4F MSGEND: DB ODH。 ORH。 OAH。* CDPY DEKIMASHITA* ,。 ODH。 OAH。* 


| O1FF FCB*$ ら 5 DS QOFH 

| | 

| O2OE END | 
公 > 


Figure-2.2.31 ファ ンク ショ ン : 16, 19, 21, 22 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


上 記 ソ ー ス ・ リ スト か ら ア セン プリ ・ ソ ー ス ・ フ ァイル を 作り 。、 ア セン プル し 。\1 の ぴの 921222 "CDM* 
を 生成 し て 実行 し て み ま し ょ う . 


ファ ンク ショ ン : 16, 19, 21, 22 実 習 プ ログ ラム の 実行 
当 プ ログ ラム を 実行 する た め の コ マン ド の 書式 を 次 に 示し ます . 


19-21-22 Xx : fenamel . extuiX': filename2 . ext / 


(新しく 生成 され る 側 ) (ソー ス 側 ) 


この コマ ンド を 実行 する こと に より 。 ド ライ プ x": 上 の ファ イル * 旬 ename2 ext(" が 。 ドラ イブ 
X: 上 に ファ イル “fenarmel 。ext と し て コピ ー さ れ ま す . 

実行 例 と し て , ドラ イプ A : 上 の ファ イル “DUMP . ASM” を , ドラ イブ B : 上 に , ファ イル 名 を 
DUMPCPY 。、 ASM" と し て コピ ー し た 倒 を 示し ます 、 


A>19ー21 一 22 BsDUMPCPY。ASM DUNMP 。 ASM/ fillename 1 と filename2 の 順序 に 注意 . 


CUPY DEKIMABHITA コピ ー ガ が 売 ゞ し レ し だ メ ツ セー シ . | 


A>DIR _BDUMPCPY。 ASM) ドラ イブ B : 上 に DUMPCPY. ASM“" と し て コピ ー こ され だ ファ イル の 確認 . 
Bs DUMPCPY ASM ファ イル が ガ 作 られ て い だ . 


ム ぬ ム >TYPE BzDURNPCPY.。 ASM/ 新しく 作ら れ だ ファ イル の 内 容 の 催 認 . 


こ 1 こ ) 


王 シ ステ ム ・ コ ー ル 徹 克 解 


FILE DUMP PRUGRAN。 READB AN INFUT FILE AND FRINTS IN HEX 


COPYRIGHT (C) 1975。 1976。 1977。 1978 
DIGBITAL RESEARCH 

BOX 579。 PACIFIC GROVE 

CALIFURNIA。 9 さ 95O 


ORG 100H 
BD0S EQU OOO5H s DOS ENTRY POINT 
CONS EQU 1 s READ CUNSOLE 
TYPEF EQU 2 sTYPE FUNCT IDN 
PRINTF EQU 9 5s BUFFER PRINT ENTRY 
BRKF EQU 1 1 5 BREAK KEY FUNCTIUN (TRUE IF CHAR READY) 1 
nPENF EQU 15 5sFILE OFEN トッ 
READF EQU 20 s READ FUNCTIODN 
。 | 
9 
れ 
| 2 
る 
DPNMSGs DB CR。LF 。" NOD _ INPUT FILE PRESENT QN DISK ゃ " 9 
H VARIABLE QREA 
IBPs DS ど 5sINFUT BUFFER POINTER 
ULDSP ェ s DS 2 sENTRY BSP VALUE FROM CCFP 
H 
8 STACK AREA 
DS 64 s RESERVE さ 2 LEVEL STACk: 
STETOF s 
5 
END 


A> この よう に , 新しく コピ ー さ ね だ ファ イル は , オリ ジ ナ ル の ^DUMP. ASM" と 同一 で ある こと が 確認 され だ . 


Figure-2.2.32 ファンクション : 16, 19, 21, 22 実習 プロ グラ ム の 実行 と その 確認 . 


実行 する 際 に は , ソー ス 側 と オブ ジェ クト 側 (新しく 生成 され る 側 ) の ファ イル 名 を 逆 に 指定 し な 
いよ うに 注意 し て 下さ い 。 1 レコ ー ド (128 バ イト ) ずつ リー ドラ イト が 千 わ あれ ます の で ,。 ドラ イブ 
が せわ し な く 動 作 し ます が あし か ら す ず . “ 

また , オブ ジェ クト 側 に , すでに 存在 し て いる ファ イル と 同一 名 を 指定 し て 実行 し た 場合 , 元 あっ 
た ファ イル が 削除 きれ て , 新しく コピ ー さ れ た も の に な っ て いる こと も 確認 し て 下さ い . 


0 


シス テム ・ コ ー ル 徹底 実習 


ファ ンク ショ ン : 18… 次 の ファ イル ・ デ ィ レ クト リ の サー チ 


CALL 手 順 
MVI の ( 三 12H) 
じん 上 し 0005H 


虹 
(結果 は A レ ジス タ に 格納 され て いる ディ レク トリ ・ コ ー ド , お よび DMA バ ッ フ ァ に 格納 
され て いる ディ レク トリ の 内 容 で 示さ れる ) 
機能 
前 回 の サー チ で 一 致し た ファ イル か ら 後 の 部 分 の ディ レク トリ を 対象 に , ファ イル を 捜す . その 他 の 
こと は ,。 ファ ンク ショ ン : 17「 最 初 の ファ イル ・ デ ィ レ クト リ の ポー ンチ と 多く て 問 一 で ああ 


実習 プロ グラ ム ファ ンク ショ ン : 18,(17) 


DIR コ マン ド に 相当 する プロ グラ ム を 作成 する . ファ ンク ショ ン : 17 の 「 最 初 の サー チ 」 を 作っ 
て , 最初 に 一 致し た ファ イル 名 を タイ プア ウト し , その 後 は ファ ンク ショ ン : 18 の 「 炎 の サー 
チ 」 を 使っ て , 一 致し た ファ イル 名 を 次 々 と タイ プア ウト する . 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


17。 SEARCH FOR FIRST H 
18s SEARCH FOR NEXT ji 
ーーーーーーー て ンーーーlーーーーーーーーーーーーーーーーーーーーーーーーーーー ーー ーーーーーー ーー ーー ーー 一 - 一 - 一 - ーー ーー ーー H 

QO1OO DRG 1OQOH 

START 

92 SE 間 bo ウチ の 2 ステ コール 
5 | FCB ア ドレ ス は デフ オォ オー ルト の 5CH と する . 

O1OS CDOS5oQO CALL OQO5H 
QO1QOB FEFF CP 255 1 ファ イル が 見 つか ひら な い 場 合 は NOFILE * 

O1OA CA4 さ O1 3 メ 2 NOFILE | へ ヘ ジ ャ ンプ . 


1 


全 シ ステ ム ・ 


aa 


コー ル 徹 区 解 説 


Figure-2.2.33 ファンクション 


を 生成 し 実行 し て み ま し ょ う . 


コジ 


リス ト か ら ア セン ブリ 


NXTF 1LE: 

Q707Q07Q70 フ 7 RLC! RLC! RLC! RLC! RLC 
SF MOV E 。 人 の 見 つか つ だ ファ イル ・ デ ィ レ クト リ の , DMA 
1 6QO MV1 D。O / 2 0 の ア 
21 ヨ OOO LXi H。 QOQBOH ドレ ス を 求め る 
19 DAD D 「 
っ さ INX ドラ イブ No. で dr" フ フィー ルド) は ここ で は 省略 . 
Q6OB MV お 。11 ファ イル 名 "XXX メ XXXXX(.) メ メ X“" で 邊 文字 . 

DUTLFI 
CSE5 PUSH~ B! 
OEO2 MV 人 DMA パ ッ フ ァ 内 の 求め られ だ アド レス (見 つ 
に 1 コ MOV 0 4 文字 ずつ 
CDO5OO CALL en に ーー > 
E1C1 POP H! POP B 人 コン ソー ル へ の 出力 ? フ ァ ン フク ション を 使用 . 
2 さ INX 0 
ea に | 1 文字 貞 カ し だ の どう の の 間断 ルー チン 
C21CO1 JNZ 0 1 1 文字 ルー プ 
-OEO9 MV1 C。9 | 
1 1 73 〇 1 LX I D。MSGCL | 復帰 ・ 改 行 を 出力 . 
CDOSQQ CALL OOO5H | 
OE 12 MV1 ヒ 。 1 日 | 7k 才 の アイ ル の サー チ の シス チム た 、 こ 一 ル 。 
CDO5OQ CALL OOO55H | FCB ア ドレ ス は 同じ く < デフ オォ ー ル ト の 5CH, 
FEFF CFP < らら 一 致す る ファ イル が さら に あれ ば *NXTFILE ” 
CA4901 JZ ENDFILE : へ ジャ ンプ し て , ファ イル 名 を タイ プア ウト 、. 
C さ ODO1 JMF NXTFILE | な けれ ば ENDFILE" ヘ ジャ ンプ . 

NOF 1LE: 
QEO5 MV1 C。9 | 
115201 に X よ D 。 MSGNOF | * フ ァイル が な い *" の メ ツ セー ジ 出 力 ル ー チ ン . 
CDO5QOO CALL oQO5H 
9 RET 

ENDF ILE: 
QOEQ9 MV 1 C。9 。 。 

ファ イル 終り * の メッ セー ジ を 出力 し て , 当 

116O() 1 LXI D,MSGED 「 プロ プラ ム を 終了 し , CPM に 戻る . 
CDQS5OQ CALL QQO5H 
C9 RET 
QODOAOR4649 MSGNOF: DE QDH。OAH。 ORH。" FILE NAT 。ODH。OAH。" 
QODOAQOA4649 MSBED: DB QODH。 QRH。OAH。 "FILE OMART" 。ODH。 ORH。』「 
QDOQA24 MSGCL: DE 


ODH。 ORH。" 


・ ソ ツー ス ・ フ ァ イ 形 を 作り 。 チ セ ネン ア ル し て , 


・18, 17 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ 


リス ト . 


コー) 


COM" 


シス テム ・ コ ー ル 徹 克 実 習 


ファ ンク ショ ン : 18,17 実習 プロ グラ ム の 実行 
当 プ ログ ラム は 。 次 の コマ ンド 形式 で 実行 し ます . 


1) 17-18 っ x : flename . ext ガ ーー ドラ イブ x : 上 の 特定 の ファ イル 名 を タイ プア ウト . 
2) 17-18x : filemach す …… ドラ イブ x : 上 の ファ イル ・ マ ッ チ する ファ イル 名 を すべ て 
オデ ブ 転 


湊 に 実行 例 を 示し ます . 


人 >17-ー18 PiP。.CON 7 ログ プイ ィ イン . デ ィ ス フク 上 の ファ イル \PI P. COM" を 捜す . 


PiP CDM - ファ イル は 存在 じ て い だ . 
FILE OMARI 
人 > 


Figure-2.2.34 ファ ンク ショ ン :18, 17 実習 プロ グラ ム の 実行 . 


仙 >17-ー18B Bi%。COM / ファ イル ・ マ ツチ 記号 を 使っ つて , ドラ イブ B : 上 の エフ ステ ンション が 
NOOM* で ある ファ イル を 捜す . 

COBOL CON 

RUNA RON | 、。 。 

CONFIB COM | ご (だ け あ つ だ . 


FILEMARKCOM 


FILE UMARI 
人 > 


Figure-2.2.35 プラ イマ リ ・ ネ ー ム に ファ イル ・ マ ッ チ 記号 を 使用 し た 実行 例 . 


人 >17ー1 日 刀 &%。 ま / フラ イル ・ マ ツチ 記号 を 使 つ て, ドラ イブ B : 上 の すべ て の ファ イル を 捜す . 


COBOL CONM 
COBOL 1O1 
COBQL IO2 
COBOL 1Q さ 
COBODL 1O4 
RUNA CON 
CUNFIG CHM すべ て の ファ イル が ガタ イプ アウ ト さ れ だ . 
Pi CBL 
STOCK1 CBL 
STOCK2 CBL 
CALL ASM 
CALL PRN 
CALL HE X 
FILEMARKCOM 


ご 


全 シ ステ ハム ・ コ ー ル 徹底 衣 説 


FILE OMARI 


仙 > 


Figure-2.2.36 ファ イル ・ マ ッ チ ナチ 記号 だ け を 使用 し た 実行 例 


この よう に , タイ プア ウト され た ファ イル 名 の 頭 に ドラ イブ 名 は 付き ませ ん が , DIR コ マン ド と 同様 
な 働き を し ます (CP ン M version1.4 の DIR は , 上 記 実 行 例 の よう に 縦 一 列 に ファ イル 名 が 並ん だ ). 
ファ イル ・ マ ッ チ 記号 の ~?? を 使っ た 例 も 実験 し て みて 下さ い . 


ファ ンク ショ ン : 23… フ ァイル 名 の 変更 


CALL 手 順 
MVI し 4 (17 是 ) 
に 0 刺 ) ゃ も 朋 た ドレ え 


CALL 0005H 
湯 
(大 レジ スネ タダ モエ せ な 1。、 る 2。、 3 の いずれ か 、。…… 変更 が 正常 に 行わ れ た 場合 . 
A レ ジス タニ 255=FFH. …… 目的 の ファ イル が 存在 し な か っ た 場合 ) 


機能 

(D, E) レジ スタ で アド レス され る FCB 内 の 1st フ ァイル 名 (dr 一 t3 フ ィ ー ル ド ) を , 2nd フ ァイル 名 
(d 中 。 フ ィ ー ル ド ) に 変更 する . 

ディ スク ・ ド ライ プ の 選択 は 。 旧 フ ァイル 名 と な る 1st フ ァイル 名 の 頭 に 付け られ る ドラ イブ ・ コ ー ド 
*dr” に よっ て 行わ れ , 新 フ ァイル 名 の ドラ イブ ・ コ ー ド “d。” は , 値 が 入っ て いて も 無視 さき れる. 
ファ ンク ショ ン 終 了 時 。 ファ イル 名 の 変更 が 正常 に 行わ れ た 場合 は , A レ ジス タ に は 0, 1, 2, 3 
いずれ か の ディ レク トリ ・ コ ー ド が 格納 され , 変更 し よう と する 目的 の ファ イル (1st フ ァイル 名 ) が 
存在 し な か っ た 場合 は , 255 ニ =FFH が 格納 され る . | 


実習 プロ グラ ム ファ ンク ショ ン : 23 


REN コ マン ド に 相当 する プロ グラ ム を 作成 す る. 


ロ オ 4 


シス テム ・ コ ー ル 徹 必 実習 


この ブロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


AA 
A>TYFE 2 さ 。PRN / 1 
ーー 5 | 
3 。 FUNCTIDN 2 さ 』 RENAME FILE : | 
# ま ーー ニニ ニー ニニ ーー ニー ニーーーーーー ニ ーー ニーーーーーー ニ ーーー ニー ニーーーーーーーーーーーーーーーーーー 1 
| 。 alaoo ORG 10OH 
START』 | 
O1OO OE17 MVI じ 。23 ] | 
O1o2 115Coo LXI D,OO5SCH | ファ イル 名 の 変更 * の シス テム ・ コ ー ル 。 
O105 CDOSOO CALL QOO5H FCB ア ドレ ス は , デフォー ルト の 5CH と する . 
O1OB さ C INR ム 折 的 の フラ ァイル が な か つ だ 場合 は . ヾ ERR“ へ 
O109 CA15O1 JZ ERR ジャ ンプ . 
O1QC QOEO9 MV1 C,。9 
O1OE 111EO1 LX』 D, MSBOK | ファ イル 名 の 変更 が 終了 し た Ok ハ ソ セー ジ を 
O111 CDOSOoo CALL OOOSH | 出力 し ,CP ン M へ 戻る . 
|  @114 Cy RET | | 
ERR: | 
O115 OEQ9 MV C,9 ウー ピン の レー ーー ーー トー 
0O117 11250O1 LXI PyMBMNRG 02 イル が ね みつ る の で て エラー メッ 
O11A CDO5oo CALL SO00NN_ 、 | ここ“ デーン 
O11D C9 RET 
O11E ODOA4F4BOD MSBOK』 DB QDH。 QAH』" DE", ODH。 OAH。” | 
O125 QDOA455252 MSGERR: DB ODH。 QAH。" ERROR 。 ODH。 OAH。' *・ 
O12F END 
| AA> / 
\ ノ 
S レ 


Figure-2.2.37 ファンクション:23 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


上 記 ソ ー ス ・ リ スト か ら ア セン ブリ ・ ソ ー ス ・ フ ァイル を 作り 。 ア セン ブル し 。 “23 . COM” を 生成 
し で 本 笠 し て で て み ましょ っ う 。 


ファ ンク ショ ン :23 実習 プロ グラ ム の 実行 
当 プ ログ ラム は , 次 の コマ ンド 形式 で 実行 し ます . 


23。」X : oldfilename . ext、inewfilename . ext …… ドイ オー まっ も の プチ ァ オ た 人 を を 、 
- 新 ファ イル 名 ” に 変更 する . 


REN コ マン ド と は , 新 ・I 旧 ファ イル の 順序 が 異な り ま す の で 注意 し て 下さ い . 実行 例 を 次 に 示し ま 
ず 、 


ヨ ら 


主 シ ステ ム ・ コ ー ル 徹底 解説 


A>DIR/ 実習 プロ グラ ム 実 行 前 の 全 フ ァイル を 確認 し て お ぐ . 


As SC COM 』 SC VL : INSTALL COM : INSTALL DAT 
As INSTALL  UVL 』 BALANCE CAL : BARRIER CAL : BRKEVN CAL 
Ar INBTALL SUB 』 23 COM 


Jo ヽ 実習 プロ プラム. 


Figure-2.2.38 実行 前 の オリ ジ ナ ル ・ デ ヂ ディスケット の 全 フ ァイル を タイ プア ウト し て 確認 し て お く 


A>2 さ SC。CODM SUPERCAL . CDH ) SC. COM/ 味 SUPERCAL.COM" に リネ ー ム する . 
DK 正常 に 変更 が 行わ れ だ メ ツ セージ. 


A> 
NN 


Figure-2.2.39 ファ ンク ショ ン 23 実習 プロ グラ ム の 実行 例 ①. 


AA>DIR/ ---- 結果 の 確認 . 

Qi BUPERCAL COM : SC DVL 』 INSTALL COM 』 INSTALL DAT 
Ai INSTALLN VL 』 BALANCE CAL 』 BARRIER CAL 』 BRKEVN CAaL 
Ai INSTALL \、SUB 』 2 さ CON 

A> 


リネ ー ム され て いる . 


Figure-2.2.40 実行 例 ① の 結果 の 確認 . 


A>BA/ ログ イン ・ デ ィ ス を B^ に チエ ンジ シ . 

B>As 2 さ AsSC.Q0VL CSUPERCAL . HVL ) ドラ イブ A : 上 の SO. OVL" を , ドラ イブ 名 "C : “を 付け だ 
SN ヾ SUPERCAL. OVL" に リネ ー ム する 

Ok に 変更 が 行わ れ な 2nd フ ァイル の ドラ イブ 名 は 無視 され る こと の 確認 の ため) 


メッ セー 
B> 


Figure-2.2.41 ファ ンク ショ ン :23 実習 プロ グラ ム の 実行 例 ②. 


。・ リネ ー ム され て いる 。 well NR 


ご の よう に 2nd フラ イル の ドラ イブ 名 は 無視 され る . 


Qs SUPERCAL CON 1 SUPERCALEOVL 』 INSTALL COM 』 INBTALL DaT 
As INSTALL OUVL 』: BALANCE CAL : BaRRIER CAL 』 BRKEVN CAL 
As INSTQALL SUB i 2 さく CON 


B> 


Figure-2.2.42 実行 例 ② の 結果 の 確認 . 


紀 


シス テム ハム ・ コ ー ル 徹 克 実習 


ファ ンク ショ ン : 24… ロ グイ ン ・ ベ クト ル の 取り 出し 


CALL 手 順 
MVI VAaaob ( 三 18H) 
CALL 0005H 


音 

(HH. 上 レジ スタ の ログ イン ・ ベ クト ル が 格納 され て いる ) 
機能 「 
現在 , オ ン ラ イン と な っ て いる ディ スク ・ ド ライ ブ の ベク トル を 報告 する . “オン ライ ン と な っ て いる “" 
と は , CPM の 起動 , ある い は リブ ー ト 以後 に ログ イン され た ドラ イブ , も し く は 自動 ディ スク ・ セ 
レク ト (FCB の dr" フィー ルド に よる ) され た こと の ある ドラ イブ の こと で , これ ら の ドラ イブ は 。 
それ ぞ れ の ディ レク トリ 情報 が CPM に 登録 済 で ある . 
分 か りや すい 例 で は 。 STAT コ マン ド を “STAT JJ と 実行 し た 場合 に 結果 が 表示 され る ドラ イブ が , 
ォ オンライン と な っ て いる ドラ イブ で ある 。 | 
取り 出さ れ た ベク トル は , (H, し L) レジ スタ に 決 の よう に 格納 され て いる . 


ーーーーーーーーーH レ ジス ターーーーーーーー へ 、 ーーーーーーーーL レジ ス ターーーーーーーーー、 


ドラ イブ 名 一 ww 


bit 7 bit0 bit 7 bit 0 


PE っ 2 ae 
それ ぞ れ の ピッ ト が ] 1 : オンライン 」 の ドラ イブ で ある . 


ファ ンク ショ ン : 25… ロ グイ ン ・ デ ィ ス ク No. の 取り 出し 


CALL 手 順 
MVI 人 ( 王 19F) 
CALL 0005H 
2 
(A レ ジス タ に ログ イン ・ デ ィ ス ク No が 格納 され て いる ) 


紀 フ 


王 シス テハ ム ・ コ ー ル 徹底 解 


に < 


機能 
現在 選択 さき れ て いる ディ スク (ログ イン 
する . 
A レ ジス タ の 値 が 0 の 場合 ドラ イブ A :, 


実習 プロ グラ ム ファ ンク ショ ン : 25,26 


2 


1 の 場合 B :。 …… 15 の 場合 : P と な る . 


カレ ント ・ デ ヂ ディス ク と か 呼ぶ ) の No を 報告 


され て いる (H, L) レジ スタ の ビッ ト 状 態 を 表示 し , 


る A レ ジス タ の 値 を 表示 する . 


この プロ グラ ム PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


A>TYFE 24-25.FPRN )/ 


ーー ーー ーー ーー ーー ーー ーー ーー デーーーー ーー ーー ーー ーー ーーーー ーー ーー ーー ーー ーー ーー ーー ーー ーー ーー ーー ーー ーー ーー ーー ー… 


H 
5 FUNCTIUN 24』 RETURN LUGIN VECTOR 
H 25: RETURN _ CURRENT DIS に 


O1QO ORG 
STARTs 
O10O さ 19601 に 


O10 さ CDS2O1 CALL 
O1O6 QE1 ピ MVI 
Oo1O8 CDOSOO CALL 
O1OB 7C MDV 
O1OC CD2CO1 CAL し 
O1QOF 1E24 MVI 
O111 CD46O1 CALL 
O114 7D MDV 
O115 CD2CO1 CALL 
O11 CDS2O1 ' CALL 
O11B CD5201 CALL 
O11E OE19 MVI 
O1 2O CDO5OO 、 し L 
O12 さ CDS5DO1 CALL 
O126 CDS2O1 FALL 
O129 CS3OOOO JMP 


に) 


1OOH 

SP。 STACK - 当 プロ グラ ム は , スタ ッ ク が 深く な る の で , 
新た に 設定 する . 

CRLFOUT --- 復帰 ・ 改 行 を し て お ぐ . 


C。24 "ログ イン ・ ベ フト ル の 取り 出し "の シス テム ・ 
OOOSH  ) コール. : 3 
H,L レ ジス タ に ベク トル が ガ 得 られ る . 


^^,H [ に 20 1 8 03 
4TDUT 」 ロ レジ スタ の ピッ トリ パターン を 出力 
E。*" も * | H レ ジス タ と し レジ スマ を 区 別 す る た め に 


CONODUT | 「$" 記 号 を 出力 . 


人 。 し 1 こう トド 2 

ョ ーー [ヒレ ジス の ピッ ト ・ は ターン 在 出力 
CNLPGUT | 。。 。。 

じ 。 < らき ~ ブ イン ・ デ ィ ス No. の 取り 出し じ " の シス テ 
OOO5H ム ・ コ ー ル . ドラ イブ No、 ガ A レ ジス マタ に 得 ら 


HEXDBPLY -- ヘ レジ スマ の 値 を 16 進 表示 . 


CRLFOUT 復帰 ・ 改 行 を 出力 . 
QQOQOOH リブ プー にし て CPM に 戻る . 


ログ イン ・ デ ィ ス ク No. が 格納 され て い | 


時 FT 


シス テム ハム ・ コ ー ル 徹底 実習 


| BITOUTs 
|  Q12C QeQO8 MV1 B,。 晶 
| O12E 0O7 LOOP』 RLC 
O12F DA さ CO1 JC 0UT 1 
O1 さ 2 1E さ O MV1 還 。 0* 
| O1 さ 4 CD46O1 CALL CONOUT 
| O1 さ 7 O5 DCR B A レ ジス マ の 仁和 を 1 の ピット 
| _ 043 ヒス 2EO0』 JNZ LOnP で 表示 する サブ ルー チン . 
| | O13 CO RET | ピッ ト / が 左側 , ピッ ト 0 が 右側 と し て ., 1 回 に 
| OUT1 : 1 ピッ ト ず つ 順 に 出力 され る . 
| O1 さ C 1E く 1 MVI に 1 
Q13E CD46O1 CALL CONQUT 
|  O141 0S DCR B 
|  OQ142 C22EO1 JNZ LOOP | 
| Q145 C9 RET | 
| CONOUT』 | 
|  Q146 FSCSE5 PUSH PSM! PUSH B! PUSH H | 
|  OQ149 OEQO2 MV1 に 。 ス | E レ ジス マガ が 持つ ウラ ス エー. コー に た | 
| O14B CDOSoO CALL GOOQSH コン ソー ル に 出力 する サブ ルー チン | 
| 0O14E E1C1F1 POF_ H! POP B! POP FSM エエ マエ ヤエヤマ 
| 0451 じ り RET 
| 
| CRLFOUT 』 
| O152 1EOD MV 1 E 。 ODH 
O154 CD4601 CALL CONOUT | 生 品 ag 行 を 由 力 する サブルーチン 
| O157 1EOA MV ONNN 0 060666060606{〈6{ 
|  O159 CD4601 CALL CONOUT 
| Oo15C Cg RET 
HE XDSPL Y』 | 
O1S5D F5 PUSH PSM 「 
|  OQO1S5E QFOFOFOF RRC! RRC! RRC! RRC 
|  O1e2 CD6eo1 CALL HQ ロ UT1 | 
| の O165 F1 FOP PSM | 
|  Q166 E6OF HOUT1』 ANI OFH A レ ジス タ の 値 を 18 進 で コン ノール レビ 出 の | 
| Oie68 C6 さ O AD さ OH eK チー チッ] | 
O168 FE さ A CFI SH | 例え ば 値 ガ ア FH で あれ ば , コン ソー ル に | 
O16C DA7101 JC HOUT2 | ラフ F* と 出力 する | 
O16F C607 ADI 7 | | 
QO171 5F HOUT2』 MOV E,A | 
0172 CD4601 CALL CDNOUT | 
Q175 C9 RET 
Q176 DS 32 ー 
O196 = STACK EQU | シィ ソバ | 
O196 END | 
| AM / 
Figure-2.2.43 ファ ンク ショ ン : 24, 25 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


上 記 ソ ー ス ・ リ スト か ら ア セン プリ ・ ソ ー ス ・ フ ァイル を 作り , アセ ンプ ル し , \24-25 . COM” を 
生成 し て 実行 し て み ま し ょ う . 


に に ) 


年 シス テム ・ コ ー ル 徹 克 衣 説 


ファ ンク ショ ン : 24,25 実習 プ ログ ラム の 実行 
当 プ ログ ラム を 実行 する コマ ンド 形式 は 1 種類 で あり , 次 に 示し ます . 
24-25J…… ド た だ これ だ け . 


次 に 実行 例 を 示し ます . 他 の ドラ イブ へ の アク セス や , ログ イン ・ デ ヂ ディス ク の 変更 に 注目 し て 下さ 
統 生 。 


EE ー Rn ea p ーー ー 和 
RE encorerPss ms em me jirei ma 
RS * 


SN 

A 
| cP M 起 動 
人 Q>24-ー25/ CPM が 起動 し だ 直後 の 実行 . 
OQOOQOQOQOOO ま OOOQOOOQO1 に ドラ イブ A : の み オ ン ラ イン. 

| 
OO ツイ シゲ デイ スン (カレ ント ディ スズ スン) は ^ ) 
>DIR Bs/ ドラ イブ B : を アク セス し て みる (例え ば DIR な ど で ). 
Bs SC COM 』 SC ロロ ソ L s INSTALL CDM 』 INETALL DAT 
Bs INSTALL  Q ロ VL 』 BaALANCE CAL  』 BARRIER CAL 』 BRKEVN CAL 
B』 INSTALL ら SUB 
| 
QA>24-25/ 再 民 実 行 . | 
OOOQOOOQO$OOQOOO 1 1 ドラ イブ B : も オン ライ ン と な の, 現在 A: と B : ガオ ン ラ イン で ある 、. | 
| OO ログ イン ・ ド ライ プ は ん : 

A>B』 ) ドラ イブ を チェ ンジ し レ て , B: に ログ イン し た . | 
B>Qs 24-25 リ / ドラ イプ ブ A : 上 の 当 プ ログ ラム を 実行 . | 
OQOOOOQOQOO$ ま OOOOQOO 1 1 A:,B: 共に ビ に オンライン. 
9 まこ トド ソイ ン ソン ・ ド ウラ イブ は B : | 
B> | 

ノ 

ジン ど 


Figure-2.2.44 ファ ンク ショ ン 24, 25 実習 プロ グラ ム の 実行 


当 プ ログ ラム の 終了 は , リブ ー ト で 行っ て いま す . リブ ー ト が 行わ れる と , シス テム 全体 が イニ シ 
ャ ル 状 態 に な り ,。 ログ イン ・ ベ クト ル 。 ログ イン ・ ド ライ ブ も , いっ た ん イニ シャ ライ ズ さ れ ま す . 


100 


シス テム ・ コ ー ル 徹底 実習 


CALL 手 順 

MVI テイ ( 三 IBH ) 

CALL 0005H 

購 

(H, ルレ ジス タ に , アロ ケー ショ ン ・ ベ クト ル の ベー ス ・ ア ドレ ス が 格納 され て いる ) 
機能 
現在 ログ イン され て いる ディ スク ・ ド ライ ブ の アロ ケー ショ ン ・ ベ クト ル の ベー ス ・ ア ドレ ス (先頭 
アド レス ) を 報告 する . 
BIOS 内 の アロ ケー ショ ン ・ ベ クト ル 1.1.2- 3 音 参 照 ): に は , それ ぞ れ の ドラ イプ の ディ スク の メ 
モ リ 使用 状態 が 記録 され て お り , この ベク トル を 調べ る こと に より , ディ スク の どの 部 分 が 使わ れ て 
いる か , 残り メモ リ 容 量 は 何 バ イト か , な ど を 知る こと が で きる . 


実習 プロ グラ ム ファ ンク ショ ン : 27 


ログ イン ・ デ ィ ス ク の アロ ケー ショ ン ・ ベ クト ル の メモ リ 内 容 を ダン プ す る プロ グラ ム を 作成 
する. 
アロ ケー ショ ン ・ ベ クト ル の バッ ファ ・ エ リア の サイ ズ は , 8 イン チ 標 準 デ ィ ス ク の 場合 は 31 


バイ ト で ある (ドラ イブ 容量 三 243K バ イト , アロ ケー ショ ン ・ ベ クト ル の 1 バイ ト で 8K バ イト 
を 表す の で , 243 ノ 8 三 30.375 と な り , 31 バ イト で 243K バ イト の マッ プ を 表す こと が 可能 で ある . 
1.1.2 一 3 章 参 照 ). 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


人 >TYPE 27.PRN / 


5 
5 FUNCTIDN 27』 GET ALLUCATIDN ADDRESS 5 


OQ1OO ORG 1OOH 


101 


主 シ ステ ム へ ・ コ ー ル 徹 必 帰 説 


STARTs * ア ロケ ーション ・ ア ドレ ス の 取り 出し * の シス 
O1QO oE1B MVI C。2 ア | テム コー ル 、H,L レ ジス タビ に, ディ スク に 
O1O2 CDO5oo CALL OOQO5H | ライ マブ の アロ ケー ショ ン ・ ベ クト ル の ベー ス 
| アド レス が 得 ら れる . 
O105 O61F MVI B。 さ 1 - バ イト 表示 の カウ ンタ として, アロ ケー ショ ン ・ ベ ペク トル ・ エ リア の 
し LOOP : バイ ト 長 を セット する . こ の 値 は に ドラ イブ に よっ て 異な る . 
Q107 7E MOV A。M 「 アロ ケー ショ ン ・ ベ クト ル エリ ア の 先頭 か ら , 
O1O8 CD16O1 CALL HEXDSPLY 1 バイ ト ざ つ 16 進 で コン ソー ル に 表示 し て 行 
ぐ 。 
O1OB さ E2O MV1 合 。” "| スペ ー ス を コン ソー ル に 出力 . 各 バ イト の 表 
O1OD CD2EO1 CALL CONOUT | 示 を スペ ー ス で 区 切る . 
H,L レ ジス タ に , アロ ケー ショ ン ・ ベ クト ル の 
の es 0 | 災 の パイ ト ・ ア ドレ ス を セッ ト し て ルー プ す 
0112 C20701 JNZ DOP | る . エリ 主体 を 表示 し 終わ つ だ ら . 本 プロ 
グラ ム を 終了 し て , CP /M に 戻る . 
O115 C9 RET 
HEXDSPLYs 
O116 F5 PUSH PSM | 
O117 OFOFOFOF RRC! RRC! RRC! RRC 
Q11B CD1FO1 CALL HOUT 1 
O11E F1 POP PSM 
O11F E6OF HOUT1z ANI OFH | A レ ジス タ の 値 を , 16 進 で コン ソー ル に 表示 
oO121 C63O AD 3OH する サブルーチン. 
OQ12 く FE さ A CFP1 さ AH 
O125 DA2AO1 JC HOUT2 
O128 C60 フ 7 ADI 7 
O12A CD2EO1 HOUT2』 。 CALL CONQUT 
Q12D C9 RET 
CONOUT 』 
O12E CSES5 PUSH B! PUSH H 
O1 さ O QOEO2 MVI に な 
O1 さ 2 5F MOV E。A | A レ ジス タ の キャ ラフ タ を , コン ソー ル に 出 | 
0Q1 さ くさ CDO5OO CALL OOOSH | 力 す る サブ ルー チン . 
O1 さ 6 E1C1 PDFP H! POP B | 
Q1 さ 日 C9 RET 
O1 さ 9 
A> 
NN 


Figure-2.2.45 ファ ンク ショ ン :27 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


ファ ンク ショ ン :27 実習 プロ グラ ム の 実行 
当 プ ログ ラム を 実行 する コマ ンド 形式 は 一 種類 で あり , 次 に 示し ます . 
27 ーー た だ これ だ け . 


実行 例 と し て , 空 の ディ スク か ら 1K バ イト ずつ ファ イル を セー ブ し な が ら 。 アロ ケー ショ ン ・ ベ ベク 
トル の 内 容 を 表示 し た り , 3 つの 大 き な フ ァイル の 内 , 真中 に 位置 する ファ イル を 削除 し た 場合 の 様 


1 名 ン 


シス テム ・ コ ー ル 徹 底 実習 


子 な ど を 示し ます の で , アロ ケー ショ ン ・ ベ クト ル の 働き が よく 理解 され る も の と 思い ます . 実行 例 
を 次 に 示し ます . 


qa 


ドラ イブ B : 上 に は 空 の ディ スケ ッ ト を セツ ト し て お こぐ . 
AA>Bs ナ ーー ロ グイ ン ・ デ ィ ス ク を B : に チエ ンジ . 
B>AaSTAT *.*) デイ スン B・ 上 の ファ イル の 最初 の 状態 を 調べ る . 


File Not Found ディ スク B ・ 上 に は ファ イル が な い 、. 


B> 人 2Z/ 実習 プロ グラ ム を 実行 し , デ ィ ス フ が 空 の 状態 の ドラ イブ B ・ の アロ ケー ショ ン ・ ベ クト ル を みる . 
CO OO OO QOQO QOQ QO oO oo oo QQO_ OO OO QQ QQO QO OO QQO QooO OO QQO OO QQ QO oO oo oo oo 
OO OO OO OoQ <^ 印 の 値 に 注目 . 


B>SAVE 4 A リ 7  - 空 の ディ スク に , 1 K バ イト の ファ イル (ファ イル 名 `A^) を セー ブ す る . 


B> 人 As 2Z7/ 実習 プロ プラム を 実行 し 。 1 K バ パイ に の ファ イル が セー プ さ れ た 状態 の ドラ イブ B : の アロ ケー ショ ン ・ ベ フト ル を みる . 
ES OO OO oo QooO oooooooooooooooooooooo oo oo oo oo oo oo oo oo oo 0o QoG 
oO OO oo Oo 印 の 値 に 注目 . 


B>SQVE 4 B/ ーー ざら に 1K バ パイ ト の ファ イル (ファ イル 名 *B の を セー プ す る . 台 和 計 2K バ イト が ガセ ー プ され だ . 


B> 人 ai 27/ 「 実 加 プ ロ プ ラム を 実行 し , 合計 2K バ イト の ファ イル が セー ブ さ れ た だ 状態 の ドラ イブ B ・ の アロ プー ショ ン ・ ベ フト ル を みる . 
FO QO QO_QQ oo oo oo oo oo oo oo oo oo oo oo oo oo OO _ QQ QQ_QOQ _QOQ QQ Oo oo oo oo 
QQO_QQ _QO OO ー 印 の 値 に 注目 . 


B>SQAVE 4 ヒ リ / ~ さら に 1K バ イト の ファ イル (ファ イル 名 `*C の を セー プ ブ す る . 合計 3K バ イト に が セー プ ブ され だ . 


B>As2Z7/ 実習 プロ グ ブラム を 実行 し , 合計 3K バ イ に の ファ イル が セー プ さ れ た 状態 の ドラ イブ B : の アロ ケー ショ ン ・ ベ クト ル を みる . 
F8 QO QO OO _ oo Oo oo oo oo oo oo oo oo oo oo oo oo OO OO oo oo oo oo oo oo oo 
OO OO 0O OO > 印 の 値 に 注目 


B>SAVE 12 DEF/ ~ 今回 は 3K パ バイ に の ファ イル (ファ イル 名 *DEF^) を セー ブ す る . 合計 6K バ イト に が セ ー ブ さ れ だ . 


B>Am2ZZ/ 実習 プロ グラ / ヽ を 実行 し , 合計 6K/ \ イ に の ファ イル が セー プ ブ さ れ だ 状態 の ドラ イブ B: の アロ ケー ショ ン ・ ベ フト ル を みる . 
FF QO QO OO Qoo oo oo oo oo oo oo oo oo oo oo oo oo oo oo o。 oo oo oo oOO OO oo Qoo 
OO QO Oo OO ー 印 の 値 に 注目 . 


B>SAVE 4 8 は / ~ ぶら に 1K バ イト の ファ イル (ファ イル 名 `G ) を セー プ ブ す る . 合計 7K バ イト が セー ブ さ れ だ . 


B>aAa2 フ 7 実習 プロ グラ /、 を 実行 し , 合計 7K/ \ イ ト の ファ イル が セー プ さ れ だ 状態 の ドラ イブ B : の アク ロケ ーション ・ ペ フト ル を みる . 
た F 日 O QO OO QO OO OO OO oO oo Oo OO_ OO_ QOO_ OO OO OO QO OO OO QO OO OO OO QOQO OO OO 
OO OO OO oo 印 の 値 に 注目 . ' 


B> 


Figure-2.2.46 ファ ンク ショ ン :27 実習 プロ グラ ム の 実行 例 ① 


全 シ ステ ハム ・ コ ー ル 徹 展 衣 説 


ドラ イブ B : 上 に 新 だ な 空 の ディ スケ ッ ツ ト を セツ ト し て お ぐ . 

B>AsSTQAT *。*/ デイ スク B: 上 の ファ イル の 状態 を 調べ る . 

File Not Found ディ スク B: 上 に は ファ イル が な い . 

B>SAVE 120 X/ - 空 の ディ スク 上 に , 30 K パ イト (〈 注 ) の ファ イル (ファ イル 名 `x を セー プ す る . 


B>SAVE 128 Y/ こら に 32K バ イト の ファ イル (ファ イル 名 ` Y ) を セー プ す る . 
B>SAVE 128 Z/ こら に 32K バ イト の ファ イル (ファ イル 名 ^Z の を セー プ す る . 


B>ASTAT #%.*/ - 現在 の ディ ス フ B: 上 の ファ イル の 状態 を 調べ る . 


ReC5 Byte Ext AcCc 


っ 4O る Ok 2 R/M BsX 
っ 56 2k さ R/M BsY ! こ れ だ け セ -ー- プ され て いる . 
っ 56 2k る R/M BsZ 


Bytes Remaininq ロ n Bg 147 ト 


B>As 27/ 実習 プロ グラ ム を 実行 し て , ド ライ ブ プ B: の アロ ケー ショ ン ・ ベ フト ル を みる . 


FE FE_FF、FEF. FE FF FF_FF_FF_FF_FE_FF QO QO QO OO OO 0O 0O QO OO QO QQO QO 90O 00 QO 
OO OO OOQ OO の 値 に 注目 


B>ERA _Y ) 32kx バ イト の ファ イル バ Y ^ を 削除 する . 


B>AsSTAT *。* / - 現 在 の ディ スク B: 上 の ファ イル の 状態 を 調べ る . 


ReCs Bytes= Ext 人 cc 


24O 3Q ト 2 R/M BiX ーー 
っ 56 マフ ト そ R/i Bsz 「 フ アイ ル " Y/ ガ 削除 され て いる . 


Bytes Remaining ロ n Bi 179k 


B>Aa 27) 実習 プロ プラ ム を 実行 し て , ド ライ ブ B ・ の アロ ケー ショ ン ・ ベ クト ル を みる . 
FF FF FF FF QQO_QQO_QO_QQO FF Fi ~F FF QQO OO QQ OO OO _QO 009 oo oO QQO QO QQ OQ OO QQ 
OO QO oO OO ーー 
へ 印 の 値 に 注目 フ ァイル ` Y / ガ ザ セ ー ブ プ さ れ て い だ エ リア が 0 に な つて いる . 


注 ) ディ レフ トリ ・ エ リア と し て , すでに 2K パ イト が 使わ れ て いる の で ,30 十 2 三 32. 


Figure-2.2.47 ファ ンク ショ ン :27 実習 プロ グラ ム の 実行 例 ② 


8 インチ の 標準 ディ スク の 場合 は ,。 アロ ケー ショ ン ・ ベ クト ル の 1 バイ ト で 8K バ イト を 表現 し ます 
が ,。 その 1 バイ ト の み に 注 目 し て , 表現 の し か た を 解説 し て お きま す . 次 の 図 を 見 る だ け で 明らか で 
信和 


104 


シス テム ハム ・ コ ー ル 徹 辰 実習 


| ビ ピット が 1 K バ イト を 表す . 


caGMGDNI 


この あと は 次 の バイ ト に 移り , 同様 の マッ ピン グ を 行う . 


Figure-2.2.48 アロ ケー ショ ン ・ ベ クト ル 内 の 1 バイト 


この よう に , 1 ビッ ト が 1K バ イト を 表し , ビッ ト ・ パ ター ン が 記録 状態 の マッ プ を 表し ます 8 家 一 
使わ れ て いな い エ リア , 1 = 使わ れ て いる エリ ア ). 
実行 例 ② で の 部 分 が C0ーE0ーFO…… と 変化 し た 理由 が 理解 され た で し ょ う ). 


ファ ンク ショ ン : 28… デ ィ ス ク ・ ラ イト ・ プ ブ プロテクト の セッ ト 


CALL 手 順 
MVI じじ 。 28……・ (1CH ) 
CALL 0005 昌 H 
機能 
現在 の ログ イン ・ デ ィ ス ク を , 書き 込み 禁止 の ディ スク (リー ド ノ オ ォ オンリー・ デ ィ ス ク ) に セッ ト す 


10 ら 5 


全 シ ステ ム ハ ・ コ ー ル 徹底 解説 


の 。 の し 


キー グチ グ ト が か 要ら れれ る 。 ただし, 


この ツイ トー デ ロ ザ グ ト 上 は , 


ター ト や リプ ブー ト が 行わ れる と 消 減 す る . 


実習 プ ログ ラム ファ ンク ショ ン : 28,25 


コー ルド ・ ス 


^STAT 
> 


STAT コ マン ド の , 
リー ド プ オン リー に 設定 され る . 


| 


X : R プ 0J” に 相当 する プロ グラ ム を 作成 する . 
X : に よっ て 任意 の ドラ イブ を 指定 する こと は で きず , 現在 の ログ イン ・ デ ィ ス ク が 


この プロ グラ ム の PRN 形 式 の ソー ス ・ 


リス ト を 次 に 示し ます . 


/ Ax>TYPE 28-25. PRN 』 
ーー ニー ニー ニー ニーー ニ ーーーーーーーーーーーーーーーーーーーーーーーーーーー ニ ーーーー ニ ーーーーー 1 
3 。 FUNCTION 2B』 MRITE PRDTECT DISK 
: っ 5。 RETURN CURRENT DISE: 5 
』 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 5 
oO1OO ORG 1oOH 
BTART : ーー ニー ーー 
onoo ohc wca マト の 2 に 022: 
QO102 CDOSQOOQO CALL QOOO5H ) スプ ) が ゞ R ?O/ と な る . 
O105 112601 LX 1 D,MSGDRV nn ーー 
o1oB CD2oo1 CALL Msggur | PHVE」 と コン ソール に 表示 . 
O1QB OE19 MV1 C。25 "カレ ント ・ デ ィ ス ク の 取り 田 レ * の シス テム ・ コ 
Q1OD CDOS5OO CALL ooo5H | 一 ル . A レ ジス タ に ドラ イブ No. ガ 得 ら れる . 
の 130 さじ INR 人 | ドラ イブ No. を A, B,C, P の ASCII コ ー ド に 
O111 F64O DR! O10O*WOOOOB 会 換 「 
O113 5F MOV EE、A ー 
3 | ドコ ン ソ ー ル へ の 出力 * の シス テム ・ コ ー ル で , 
O114 OEo2 MV1 の こう CA 
O116 CDO5OoO CALL ooOS5H 
O119 112FO1 LX 1 D。MSGSET ) 。. ーー 
Q11C CD2OO1 CALL MssguT | SE HO」 こ コル ソー ル に 表示 , 
Q11F C RET --CP ン M に 戻る . 
MSBDUT 
O12O QEO9 MV1 に 、 全 っ S 
O125 C9 RET 
O126 ODQA445249 MSBDRV: DB ODH, QAH。 "DRIVE 1 
O12F さ A2O5 ミ 4554 MSBSET』 DB > 。 SET R/0* 。ODH。 OAH。" (チエ ンプ - 
01SB END 
A> 
ト 、 
Si 2 
Figure-2 .2.49 ファ ンク ショ ン : 28, 25 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


アー 


シス テム ・ コ ー ル 徹底 実習 


王 生 ツ マー ス * プ ァイル か ら デ セン プリ サ ・ ワ ソー ス ・ フ ワ ファネル を 作り 。 アセ ンプ ブル し 。 *28-25 。 COM/ 


を 生成 し て 実行 し て み ま し ょ う ). 
ファ ンク ショ ン : 28,25 実習 プロ グラ ム の 実行 
当 プ ログ ラム を 実行 する コマ ンド 形式 を 次 に 示し ます . 


28-25 す …… だ だ さぶ 奉 在 維 . 


上 記 コ マン ド を 実行 する こと に より , 現在 の ログ イン ・ デ ィ ス ク が R プ O と な り ま す . 実行 例 を 次 に 


が に ます . 


2 ーーーーーーーーーーmー ア ーー ーー ーーーーーーーーーーーーーーー ム へ 、 


A>STAT }》 現在 の ドラ イブ の 状態 を 調べ る . 


仙 s ド R/M。 GDaC@ 1 19 に ド [ 入 . 日 挫 に *R W で ある . 


BsR/ 和 M。 Spacei 79 に 


>28ー-25 / 実習 プロ グラ ハム を 実行 . 
DRIVE Az SET R/ ロ ログ イン ディ スク の ドラ イブ A : が "R O/ に 設定 され だ . 


ーーー 注目.* ロ グイ ン ・ デ ィ ス フク の 取り 出し * の シス テム ・ コ ー ル を 利用 し た 表示 . 


A>STAT/ ドラ イブ の 状態 を 調べ る . ( 
Az R/ ロ 。 Spacei 119K へ ^A: は "R O'" と な つて いる 、. 
Bs R/M。 Spacei 75K B・ は 元 の まま . 


人 A>DIR TEST2B.TXT/ ドラ イブ A : 上 の ファ イル TEST28. TXT^ の 存在 を 確認 する . , 


QA>TEST28 す XT 人 千住 じ て いる . 


A>ERA _ TEST28.TXT/ ファ イル ^TEST28. TXT^ の 削除 を 試み る . 


Bdos Err ロ nn zi R/0 へ CO ーー ドラ イブ が ガ "R _O" の だ め 削 除 で き な い .Ctri-C を キー イン レ . 


け リプ ブー ト し て GCP M ビ 戻す . 


QA>ERA TEST2B.TXT/ 再 展 削除 を 試み る . リプ ブー トド により, “R_ 0O" は キャ ヤン セル され て いる , 


A2DIR TEST28B.TXT/ ファ イル ^TEST28. TXT^ の 存在 を 確認 する . 


NO FILE CEC に よる リプ ブー に ト により,“R OO" ガリ セツ ト さ れ だ の で , 削除 きれ て いる . 


病み 9 ま / ここ に ン イ ンプ テス ン を 日 (ビエ ン ツ 
> 人 A』 2 日 -25S / - 実習 プロ グラ ム を 実行 . 
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全 シ ステ ハ ・ コ ー ル 徹底 解説 


DRIVE Bs SET R/0 グイ ン - デ イス ツタ の ドラ イブ B ・ が YR〆O ゲ 設定 され だ . 
。 。 も 往 目 ヾ ロブ イン ・ デ イィ スク の 取り 出し * の シス テム ・ コ ー ル を 利用 し だ 表示 . 


B>Ar STAT ) ドラ イブ の 状態 を 調べ る . 
AI R/M。 Spwces 123K.。 リプ ブー ト に より *R/O* つ RW" に 戻 つ て いる . 
Bi R/0。 SBpacei 79K 今回 RCO' に 設定 され だ . 


B>^C Ctrl-C に よる リプ ブー じ を 行う .、 
_B>AsSTAT ) ドラ イブ の 状態 を 調べ る . 


Az R/M。 SBpaces 123K | ーー ュ の 2 あの は 
Bi R/M。 Spacei 79K 「 フフ ト に により, すべ て の ドラ イブ の ^R 0" は キャ ヤン セル され る . 


B> 


Figure-2.2.50 ファンクション :28, 25 実習 プロ グラ ム の 実行 . 


ファ ンク ショ ン : 29… リ ー ド ノ オ ン リー・ ベ クト ル の 取り 出し 


CALL 手 順 

M VI Pen (=1DH ) 

に 胡 も も 0005H 

音 

((H, L) レジ スタ に , R プ 0O ド ライ ブ を 示す ベク トル が 格納 され て いる / 
機能 」 
ーー シン クジ ジョン 28 の ディス ネス み テキ トド ト ・ デ ロ チ ク ト の モット 1 あま する で 、 よ 。 ある い は BDOS 
に より (例え ば 。 ディスケット を 交換 し て , リブ ー ト を 行っ て いな い 場 合 な ど ) ライ ト ・ プ ブロ テク ト 
され た ディ スク ・ ド ライ ブ の ベク トル を 報告 する . 
ペク トル は .。 ファ ンク ショ ン : 24 の パロ グイ ン ・ ベ クト ル の 取り 出し の 場合 と 同様 の 形式 で , (H, 
L) レジ スタ に 格納 され る . 


実習 プロ グラ ム ファ ンク ショ ン : 29 


| ライ ト ・ プ ロ テ ク ト が 付け られ た ディ スク ・ ド ライ ブ の ベク トル を 表示 する . 
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表示 の 形式 は 


先導 し 電 あ 多 拓馬 俳 、】 


ン 


O10QO 


Q0100 


O1Q3 
Q105 


Q108 
O109 
Q1QC 
QO1OE 
Q111 
0112 


Q115 


Q11 昌 


0119 
Q11B 
O01 1C 
011F 
O121 
O124 
O125 
O128 


O129 
O12B 
O12E 
O12F 
O1 さ 2 


O1 ささ 
O1 さ 6 
O13 晶 
O1 く B 
O1 SE 


NR>TYPE 2 ワ 、 ド じ RN ) 


CDSFO1 


OE1D 
CDOSOO 


4 
CD19O1 
1E24 
CD ささ 3O 1 
7D 
CD19O1 


CD さ SFO1 


じ り 


Q6Q 昌 
O7 
DA290 1 
1E さ Q 
CD ささ Q 1 
Q5 
C21BQ1 


FSCSE5 
QOEQO2 
CDOSQO 
E1 じ 1F1 
の 。 


た だ あと 


X 


中 


AA し 共 共 汰 大 


ドラ イブ 


ョ ン : 24 で 行っ た の と 同様 に , 


A ・: 


の ビッ ト が ^R/0′ の ドラ イブ を 示す . 


シス テム ・ コ ー ル 徹底 実習 


も マト ーー ニー ニー ツー ュー ニニ ーー ツー な っ ーー ンー ボー セー ネー ーーー っ ーー ここ つこ こ に こっ こっ 5 
H FUNCTIOUN 29』 BET READ DUNLY VECTOR 3 
ーー ツー 5 
DRG 1OOH 
GSTART > 3 
CALL CRLFUUT 復帰 ・ 必 行 を 出力 . 
MV に 。、 メ ゲ コ ォ ナード デオ ン リ ー ベ トル の 必 りり 出し "の シス 
CALL OOOS5H テム ハ へ コール. 
ALL Br ライブ : て に の ピッ ト 状態 を 生 示 
MV1 に 。 ーー ニー ーー 
MOV 人 a。 し 2 、 2000N 
CALL BITOUT に フイ ブ H : 一 A : の ビッ ト 状 態 を 表示 . 
CALL CRLFOUT 復帰 ・ 改 行 を 出力 . 
RET プロ グラ ム 終 了 . CP - M へ 戻る . 
BITOUUTs 
MVI B, 日 
LOOUPs RLC 
JC BUTI | 
MV1 SR | 
CALL CONOUT 
DCR BR | 
JNZ LODOP | ヘレ ジス タ の 内 容 を 0.1 で ビッ ト 表 示す る 
RET 「 サブ ルー チン 
OUT1i | 
MV1 7 1 * | 
CALL CONOUT 
DCR B 
JNZ LOOP | 
RET | 
CUNODUT 


PUSH FPSM! PUSH B! PUSH H 


MV 
CALL 
POF H! 
RE に T 


に 2 
OQOSH 


PUF B! 


PUP j SM 


| に 出力 する サ プ ル ー チ ン 


| 


ア 


1098 


全 シ ステ ハム ・ コ ー ル 徹 必 衣 説 


CRLFDUT: 
O13F 1EoOD MVI E, ODH 
O141 CD ささ o1 CALL CONOUT ーー 
O144 1EOQA MVI GA PP て | 
O146 CD ささ O1 CALL . CpNOuT 
Q149 C9 RET 
oO14a END 


谷 > 


Figure-2.2.51 ファ ンク ショ ン :29 実 習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 
上 記 ソ ー ス ・ リ スト か ら ア セン ブリ ・ ソ ー ス ・ フ ァイル を 作り , アセ ンプ ブ ルレ し , “29 . COM” を 生成 
に 抹 特 | て ああ も ょ よう 、 
ファ ンク ショ ン :29 実習 プロ グラ ム の 実行 


STAT コ マン ド を 使っ て それ ぞ れ の ドラ イブ を ^R〆O” に 設定 し , 当 プ ログ ラム で , その 結果 を 調 
Co 科 ち - . の ly が 
当 プ ログ ラム を 実行 する コマ ンド 形式 は 次 の 通り です. 


29 リ …: ド た だ これ だ け . 


実行 例 を 次 に 示し ます . 


9 一 次 の STAT コ マン ド に よる 表示 が ,A : ,B : 共 ビ レポ ー ト され る よう に , 例 えば この よう に B : に も アフ セス し て お ぐ . へ 


>STAT / 


Ai R/W。 Spacei 157K 初期 状態 の 確認 . この よう に A : ,B : 共に RW" で ある 
B』 R/M。 Spacei 11 くさ k か 6 


QA>29 / 実習 プロ グラ ム の 実行. 


OOOOOOOO$OOOOOOQOO すべ で 0" で あり の ,^R 0" の ドラ イブ は な い . 


A>STQAT Bs=R/0 / STAT コ マン ド で , ドラ イブ B : を ロバ O" に 設定 する . 


>29 / 実 百 プロ グラ ム の 実行 


OOQ0OQOOQO ま OOOQQOO1 0 
2 番目 (ドラ イブ B ・ ) ガ が"R _O" と 表示 され だ . 


>STaT / STAT コ マン ド で 人 胡 認 し て みる . 


シス テム ・ コ ー ル 徹底 実習 


人  2k| cok っ っ イフ rgr OCTehtus 


A>STAT ai=R/0) ざら に STAT コ マン ド で , ドラ イブ A : も \R _O* に 設定 する . 
A>29) 実 埋 プロ プラ ム の 実行. 
OOOQQOOQO$OQOQOOQQO1 1 


0 ドラ イブ A : , B : 共に ^R  O*“ と な つた だ . 


Figure-2.2.52 ファ ンク ショ ン :29 実習 プロ グラ ム の 実行 例 . 


求め る ベク トル は , ファ ンク ショ ン : 24 と 同様 の 形式 で , (H, L) レジ スタ に 格納 され て いま す . 


ファ ンク ショ ン : 30… フ ァイル ・ ア トリ ビュ ー ト の セッ ト 


CALL 手 順 
M VI ko (1EH) 
(D, E) FCB ア ドレ ス 
CALL 0005 昌 H 
昌 
(A レ ジス タ に , 0 1, 2,。 3 いずれ か の ディ レク トリ ・ コ ー ド ,。 もしくは ファ イル が 
存在 し な い 場 合 。 255 (FFH) が 格納 され て いる ) 
機能 
任意 の ファ イル に , リー ド ・ オ ン リ ー (R プ O) や , シス テム (YS) ・ ア トリ ビュ ー ト を セッ ト し た 
これら の サモ セッ ト で お ある 氏 /W や HE 了 イド リセ ュ に 9 り ゼット し た 9 本 を と を が やま る. 
FCB の 1st フ ァイル の エク ステ ンション 用 の 3 バイ ト (t1, t2。t3。 フィ ー ル ド ) の 内 の 2 バイ ト の, 
それ ぞ れ の 最上 位 ビ ッ ト (bit7) の 値 に より , 


t1 の bit7 三 0 の と き “RW ファ イル 
t1 の bit7 三 1 の と き “R プ 0” ファ イル 
(2 の bit7 三 0 の と き - SYS" ファ イル 
t2 の bit7 三 1 の と き “DIR” ファ イル 


と な る (この こと か ら も ファ イル 名 に カナ は 使用 で き な い ). 


全 シ ステ ハ ・ コ ー ル 徹底 解説 


CAEL 終 了 後 。A レ ジス タダ タ に は 0, 
イル が 存在 し な か っ た 場 


Sc 
ロッ 


も こう ずれ か ディ ヤグ も りく うさ 計 


255 (FFH) が 格納 され る . 


実習 プロ グラ ム ファ ンク ショ ン :30 


STAT コ マン ド に よる 


"STAT 


X : fename . ext 


ー ト 設定 機能 に 相当 する プロ グラ ム を 作成 する . 


と りあ え ず , 通常 の ファ イル CR/W" で "DIR) に 


付け る プロ グラ ム の , PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


A>TYFE さ o.FRN 』 


100 


005C 


Q10Q 
0102 
O105 


O1QO8B 
Q10a 


Q1QD 
O10F 
0112 
O114 


011 フ 7 
O119 
O11B 


Q11E 


O121 
O124 
O126 
O129 


Q12C 
Q12F 
Q1 さ 1 


O1 さ 4 


O1 3 うら 6 
O1 39 


し か 


QOEO い ママ 
1 1 4Bo 1 


CDOS5oo 


OEQ1 
CDOSQO 


FES2 
CA21O1 
ド だ に 5 さ 
CA2CO 1 


OEO デ = 
1E さ F 
CDOSQO 


C308BO 1 


さ Q65QOO 
F68QO 

さ 26SOO 
C さ さき 401 


さ Q66QQ 
F6BQ 
さ 2660O 


QE 1E 
1 15COO 
CDOSQO 


FCBH 


STaRTs 


ド KEYINs 


SETROs 


SETSYSs 


FNC さ Os 


10OH 


QQS じ H 


C。9 
D。MSG INF 


| い R? ま だ は *S/ の キー イン を 促す メッ セー ジ を 
QQQOSH 2 


を ま | ゝ 2 2 アゲ / か ハニ ーー 3068 2 
上! コン ソー ル 入 (の シス テム コー ル 


* 尺 * ( 2 Wr つ ん ーー、\ だ 6 
| キー 入力 が ^R" な ら *SETROY ヘ ジャ ンプ . 
* ら ? ここ NN アガ 4 で で そ で 
aa キー 入力 が *S/ な ら *SETSYS“ へ ジャ ンプ . 


2 | 

の 8 4 
それ 以外 の キー 入力 な ら ^ “を 表示 し て , 

0 二 キ ー 入 力 へ 、 

に KEYIEIN 

FCB+9 


1QQOQOWQOQOOB | FCB の t1 の bit7 を 1 に セッ ト し "FNCS80" 人 へ 


FCB+ ウ ジャ ンプ *R/07 ア に リピ ュー に を セツ 
FNC さ Q ずる . 
FCB+1Q | EoB の t2 の bit7 を 1 に セッ ト し FNC30* ヘ ジ 


1OQOO ま OQOQOB て NN / | キラ ーー 6 
ScRooc0P | ャ ンプ 、 eve アト リス ッ ル を 5vyR の る . 


Cy30 | ファ イル - ア トリ ピュー ト に の セッ ト “ の シス 
p。FCB 」 王 /. コ ー ル 
ooo5H 


も し く は 目的 の ファ 


SR プ 0J す "な どの , ファ イル ・ ア トリ ピュ 


NL/05。。 生 、0N ザイル あの 人 ト を 


シス テム ハム ・ コ ー ル 徹底 実習 


O1 ス じ FEFF CPI 2ss ヘレ ジス タダ ガ 255 な ら , ファ イル が 存在 し て い 
な か つ だ . 
O1SE CO RNZ - ーーー A レ ジス タ ガ 255 以 外 な ら , プロ グラ ハム 終了 . CPM へ 戻る . 
0 EPR | "ファ イル な し * の エラ ー・ メ ッ セー ジ を 出力 
O141 117901 LXi D,MSGERR こっ "MA 戻る 
Q144 CDO5oO CALL QOQSH | - - 
Q147 C9 RET 
O14 ODOAS22965 MSBINF': DB QDH,QAH。"R)ead on1y or 8B)ystewm ?" 
Q164 20202O0494E DB * INPUT ( R / 8 ) > 
0O179 ODORQDQA46 MSGBERR』 DB ODH, QAH。 QDH。 OAH。" FILE NODT FOUND 。 ODH。OAH。ODH, OAH。" ** 


Q19O END 


Fure-2.2.58 ファ ング ショ ン :30 実 プ ログ ラム の KM 穫 区 の シー えり スズ スト, 
王 二 ノー ス * サ スト か ら ア セン ブリ ・ ソ ー ス ファ オル を 作り 0。 ア セン ブル し 3 CDM を だ 生 は 
し で て 答 行 し て みなみ ましょ う . 
ファ ンク ショ ン :30 実習 プロ グラ ム の 実行 
当 プ ログ ラム を 実行 する コマ ンド 形式 を 次 に 示し ます . 
31.X : filename ext …… この 後 民 また だ ば 5 を 到 一 イン する . 


この コマ ンド を 実行 し た 後 。 プロ グラ ム の 問い に 答え て ,。 `R プ 07 ファ イル に する な ら ば \R? を 
キー イン , SYS" ファ イル に する な ら ば “S? を キー イン し ます . 
実行 例 を 次 に 示し ます . 


A>SBTAT Bs*。\% / 実行 前 の ドラ イブ B : 上 の ファ イル の 状態 を 見 て お ご . 


KR に こら Byte5 Ext Acc 


eo Bk 1 R/M BiBALANCE.CAL 
さき 5k 1 R/M BiBARRIER.CAL 
ミ フ 5k 1 R/M BiERKEVN.CAL 
2B 。 13k 1 RZ/M BiINSTALL. CO 
34 4 昌和 本 EE BRT あの 26 し ーー っ 
274 35k 3 R/M BiINSTALL.DVL 
2 1k 。 1 R/W B:INSTALL.SUB 
196 。 25k 2 R/M BsBC.C ロ N 
164 21k 2 R/M BsSC.OVL 
Bytes Remaining Hn Bi 11 さ ミト 


人 A>SO_BsSC.COM / …B: 上 の ファ イル ^*SC.、COM" に 対し て , 実習 プロ グラ ム を 起動 、 


R)ead only or ら )ystem NEUT ( 内 / 8 ) >R 


全 シ ステ ハム ・ コ ー ル 徹 克 誕 説 


ヾ R ノ 6 アト リピ ュー ト が 付け られ だ . [ 
A>3O BISC。UVL7/ 同様 に も う 1 つの ファ イル SC. OVL" に 対し て 実習 プロ グラ ム を 起動 . 
R)ead only or ら S)ystem ? 1NPUT ( R / 5 ) >8. 愛 度 は SYS' に する. 
SYS ント リピ ュー に が 0 けつ れ だ . 

A>BTAT Bs*。#/ - 結果 を 確認 する . 実行 前 の 表示 と 比較 . 


Recs  Eytes5 Ext acC 
6O に 1 1 R/M BiBALANCE . CAL_ 


さ 5 5k 1 R/M BzBARRIER . CAL 
マフ 5k 1 R/M Bzi BRKEVN. CAL 
9 1 さ ト 1 R/M Bz INSTALL . CDM 
116 15k 1 R/M Bs INSTALL . DAT 
274 さ 5k さ R/M BizINSTALL . DVL 
っ 1 k 1 R/M Bz INSTALL . SUB 
164 っ つ 1k っ R/M Bs (8C.H ソ UL)  ( ) に 注目 . *SYS" ア トリ ビュ ユー ト は ^〈 で が され る . 
196 25 に 2 R/G BBC。COM ロバ O に 注目 . 


Bytes Remaining On Bi 113k 


A>DIR Br) ディ レン トリ を 見 る . 
Bs SC COM :』 INSTALL COM 』 INSTALL DaQT 』 INSTALL OUVL 
B: BALANCE CAL : BARRIER CAL 』 BRKEVN CAL 』 INSTALL SUB 


A> シス テム ・ ア トリ ビ ピュー ト の 付い た ファ イル `SC. OVL" が 表示 され て いな いこ と に 注目 . 


Figure-2.2.54 ファ ンク ショ ン :30 実習 プロ グラ ム の 実行 . 


当 プ ログ ラム は ,。“"R プ O0? と “SYS” アト リ ビ ュ ー ト を 付け る の み で す が , これ ら を リセ ッ ト す る 
機能 も , 同様 に 簡単 に 追加 で きま す . 各自 で 試み て 下さ い . 


CALL 手 順 


MVI ee ( 三 1FH) 
CALL 0005H 


湖 


((H。L) レジ スタ に ディ スク ・ パ ラメ ー タ ・ ブ ロッ ク の ベー ス ・ ア ドレ ス が 格納 され て 
いる ) 


機能 


BIOS 先 頭 の "JUMP ベク トル に 続 


ー 


シス テム ハム ・ コ ー ル 徹底 実習 


プ ブロック "(35 バイ ト ) の ペー ス ・ デ アド レス を 来 め 、 (EE 所) レジ スタ に 格納 すず る: 


ーー ザー ビデ ラム に お いて で て 。 ディ ネ ク の 会 合間 


く 。 ナチ ィ ズ スク rc4 電 メー タ 定 義 部 の "ディ スク aspt ァ メ ェ ッ タタ ・ 


トラ ッ ク 数 , セク タ 数 , 最大 ディ レク トリ 数 , 


その 他 の ディ スク 諸 元 を 調べ た り , この 15 バ イト の 値 を 変更 し て , 例え ば 1 つの ドラ イブ を 片面 使用 


ご 両面 使用 を BIOS 上 で 自由 に 切り 其 えて 使う 場合 な ど に 利用 され る (1.1.2- 3 章 参 照 ). 


実習 プロ グラ ム ファ ンク ショ ン : 31 


| ディ スク ・ パ ラメ ー タ ・ ブ ロッ ク の 15 バ イト を ダン プ す る . 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


/ A>TYPE 31 。PRN 』 


O10O 


_Q10QO 
O102 


O105 


O107 
O108 


010B 
O1OD 


QO11O 
O111 
O112 


O115 


O116 
Q117 
Q11B 
O11E 
Q11F 
0121 
O1 2 さく 
0O1 25 
01 2 
O122 
O12D 


QOE1F 
CDOSQQ 


O60F 


4 コ 
CD16QO1 


さ E2O 
CD2EO1 


2 さく 
05 
C20701 


CC 


F5 
QFOFOFOF 
CD1FO1 
F 1 
E6OF 
じ 6 さ O 
FE さ 3 
DA2AO1 
に 6Q フ 7 
CD2EO1 
じ 9 


LOOP : 


KK 


HEXDSPLYs 


HUUT1』 


HUUT2i 


RRC ! 


C. ミ 1 、' デ イィ スク フラ メー タマ - ア ドレ ス の 取り 出し "の 

ooo5H | シス テム ・ コ ー ル . H, し レジ スタ に , その ベー 
ス ・ ア ドレ ス が 取り 出さ れる . 

B。 15 45 バイ ト 分 ダマ ンプ する カウ ンタ を セッ ト . 

A。M 「 

HEXDaply | | パイ ト の タダ ンプ 


a。 0 


H | H, L ポ イン タ を 1 つ 進 め , 次 の バイ ト の ダン 
B : プ へ 。45 バ イト 出力 し 終わ つ だ ら , 炊 の *RET* 
LOOP | へ 


プロ グラ ム 終 了 . CPM へ 戻る . 


PSM 
RRC ! 
HOUT 1 
PSM 
QFH 
さ 〇 OH 
さ 人 H 
HOUUT2 


RRC 


A レ ジス タダ の 仁 を 16 進 で コン ソー ル に 表示 
( 9 る サジ ルー チン . 


"2 
CONOUT 


全 シ ステ ハム ・ コ ー ル 徹 展 衣 説 


peeo 』 


CONDUT : 
| Qt2E CSES PUSH B! FUSH H 
O13O OEo2 MV1 C | [ 、 
* < | レジ スタ の アス キー コー ド に を , コッ ソール 
フィ Mo LN | に 出力 する サブ ルー チン | 
Q133 CDO5QOO EALL 。 Go005Hh | 
O1 さ 6 E1C1 POP H! FOP B 
O13 C9 RET 
O139 END 


ーー い ーーーー 一 ーーーーー ーーーーーーー ーーーーーーーー 一 ーーーーーーーーーーーーーーーーーーーーーー ー ー ーーーーーーーーーーーー ニ ーー ニーー ニ ーー 


Figure-2.2.55 ファ ンク ショ ン :31 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト 


上 記 ソ ー ス ・ リ スト か ら ア セン ブリ ・ ソ ー ス ・ フ ァイル を 作り , アセ ン ブ ル し , “31 . COM" を 生成 
に で 家 特 し て で あま し ょ う 。 


ファ ンク ショ ン : 31 実習 プロ グラ ム の 実行 
当 プ ログ ラム を 実行 する コマ ンド 形式 は 単純 で , 
まい っ ぃ さか 7 テ これ だ は け は 、 


と キー イン する だ け で , 現 胡 ログ ギン し て いる ドラ イブ プ め ディ スタ * パラ メー タ ・ ブ ロッ ク の 5 バイ 
ト が ダン プ き され ます . 
実行 例 と し て , 8 イン ナチ 標準 ディ スク の 場合 と NEC PC-8001 CPM (1W) の 場合 を 次 に 示し ます . 


^ ヽ 


4 、 
| A ゝ ミ 1) 8 イン チ 標 準 デ ィ ス ク の 場合 の 実行 例 ! | 
| 4A OO 0 くさ O7 OQO F2 QO0 3F 00 CO 00 1QO OO Q2 0Q 

| 仙 > 

\ ] / 
N 1 - ン 


Figure-2.2.56 ファ ンク ショ ン :31 実習 プロ グラ ム の 実行 . 8 イン チ 標 準 デ ィ ス ク の 場合 . 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー プ ーー て ーー プーーーーーーーーーーーーー ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 
5 ^ ヽ 


/ A> さ る 1 7 PC-8001 CPZMC(1W) の 場合 の 実行 例 . 


| 20 QO QOS 0Q フ 7 QOQ B ミ QO ミ F oo CO QO 1o oo Q2 QQ 
A> 


人 


Figure-2.2.57 。 同上 . PC-8001 CPM (1W) の 場合 . 


116 


を 1 ま は 
流 笑 の (AAT) 区 プ dO 1008-Od 十 回 6922-9Jn8i コ 


腔 ば そ / へ みん ウ ギー ド 7 と ん 口 屋 証 友 と \ /9 し の つ 、 


1 ヨコ 5 ゴコロ 『 


る MQ QBVQ 
ヨ Z IS 3 ヨ H コ 5 91 MQ ヨ Z9q 
1 コロ TTu* Q に (6 QZ9Q 
O コ 0TTU る 6 に (6 コ Z9Q 
X り MI AdH1 コ ヨ dIQ* ぶさ 9 MQ り Z9q 
1- ヨ Z1S SIdi も て! MG BZUq 
JSVM LN1X ヨ * Q に (6| ZZ9q 
JSUM 018 * Z に (6 9/9Q 
+ コ 1HB : コ 0] コ 8 * ぐ HG G/Uq 
2 コ り 1 ヨコ コ ヨ S* の で MG ぐ ZV9Q 
3 コロ 1 MJHUd SIQq* 各 9 ヨ OHdQ ぐ ZVQ 
[】 
ヨゴ ロリ 」』 ヨコ 1 けり 1SNU1* HOOOO『O1 コ 1X MQ 50 ヨ dd OOOOQOQO SU9Q 
SO01H ヨ ヨ 1 ヨ MUJUd SI コロ ヨコ Su\* に 3 「19 ヨ ヨ SUdQ = ぐ ぶ GO 
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学 の と と と る 科 と べく ロロ ・ く ーー だ と 7/ と と と と の SOI ヨ の (DA dO 【008-Od 7 Ndd "958S0 Td コ d ヨコ 人 上 くり 


受 徐 の Z 
と と と 電 田 了 そく と 8 1 ムル その 旨く ロ と ・ テ ー〆 と と > <・ と と と と の SOId の 肖 療 「 8662-9Jn8I コ 


逐 ば や と くら ギド ソフ と ん 口 / 最 着 友 ゴ と )/9L の ご 、 


1 ヨコ コロ ココ Ud1『 と MQ りら ぴり 

ヨ 7 15S : コ ヨ Hd コ * 9{ MQ に に い 』 2 

1 コ 0]TU* O Q /6 げ セ 

oO dQnTTu* と 61 HQ 96 ぴ セ 

X り MI 人 01 コ ヨ ヨ 1d* ぐ 9 MQ ヤム ぴ セ 
1- ヨ 715S SIq* と ャ ン MQ て 6 ぴり セ 

JS9M ]]nN* Q dQ 1 6 り 

JGUM JJ0T8* Z に (6 O6 り 

01 コ リオ 1 ヨコ IHS J コ 0 * を に (6 | ゴヤ 
J コ U1 引 ヨ コ SGJ01 コ ヨコ S * 9 ご MQ に 44 


SGSId ]]U 0 ロ 1 NOMMIOO "1 コロ コロ ヨ ヨ 1 ヨ LMIUJUd STI siTHdQ 


マン と る 区 とどく ロ と と ー そ と!/ と と と と の SOI ヨ の と と と と 家 疾 モ こと 9 「 NdJd*SDIH コ ヨコ 人 くり 


を ま | 琴 2032 う 4 ム と と を 狂 競 類 の らん 
へ ロロ と ・ ダ ター〆 ど と ふ ><・/ と と と の 24/ ル テ /Nd の SOId② 愉 /dO の 上 午 《 の こ “<-】@ マ の 年 色 


曳 圭 銘 過 (一 ビバ 7 と と < 


和仁 シス テム へ ・ コ ー ル 徹 展 解説 


CALL 手 順 
MVI  C, 32…… (20H) 
セッ ト の 場合 | (E) ー ュ ー ザ ー・ コ ー ド (0-15) 
CALL 0005H 
MVI C,32 
取り 出し の 場合 (E) OFFH 
CALL 0005H 
機能 


任意 の ユー ザー・ エ リア へ 移行 する . また は , 現在 の ユー ザー・ エ リア の No を 報告 する . 

前 者 の バセット ? の 場合 は 。E レ ジス タ に 任意 の ユー ザーNo( 0 15) を セッ ト し て CALL を 行う . 後 
者 の * 取 り 出 し / の 場合 は , セレ ジス タ に FFH を セッ ト し て CALL を 行う . 結果 は A レ ジス タ に 0 15 
の 値 と し て 取り 出さ れる . 


実習 プロ グラ ム ファ ンク ショ ン : 32 


ユー ザー・ エ リア を 変更 する *USER? コ マン ド と , 現在 の ユー ザー・ エ リア な ど を 報告 する ^STAT 


USR : ” コマ ンド の 一 部 に 相当 する プロ グラ ム を 作成 する . 
機能 は 2 つ で ある が , プロ グラ ム は 一 本 に まとめ る . 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


STARTs 
Q1OO さ ASDQOQ LDA 
QO1O さ 47 MOUV 
Q1QO4 FE2O CF I 
06106 CA2201 JZ 
O1Q9 さ ASEOQO LDA 
O1OC FE20 CP 1 
O1OE CA1CO1 JZ 
O111 E60OF 全 NI 
01 1 くさ C6OA 仙 DI 
FNC32s 
O115 OE2O MV 
の 11 ア き F NM ロ V ソ 
O118 CDOSOO CALL 
O11B C9 RET 
SBYTEs 
O11C 7 MOV 
O11D E6OF NI 
O11F C さ 15O1 JNMP 
GETUSERs 
O122 OE2O0 MV 
O124 1EFF MV 1 
QO126 CDOSOO CALL 
QO129 CD2DO1 CALL 
O12C C9 RET 
HE XDGPLYs 
O12D F5 PUSH 
Q12E OFOFOFOF RRC ! 
O1 3 く 2 CD さる 6O 1 CALL 
O1 さ 5 F1 PUP 
O1 さ 6 E6OF HUDUT1』 ANI 
O1 3 C6 さ O 人 DI 
O1 さ QA FE さ 3 C じ Pi 
013C DA41O1 JC 
O1 さ F C6O フ 7 人 DI 
O141 CD4SO1 HOUT2』 CALL 
O144 C ヒ 9 RET 
CONOUT』 
O145 QOEQ2 MV 
O147 SF NM ロ ソ 
O014B CDOSOQQO CALL 
O14B C9 RET 
O1 4 じ END 
仙 > 
Figure-2.2.60 ピン ポン ター 


RRC! 


シス テム ・ コ ー ル 徹 克 実習 


Ft | プロ プラ ム の 実行 時 に , コ マン ド ・ ラ イン の 

B。 AA | パラ メー タ が ある どう か の チェ ッ ク . パラ 

の の | メー タダ が ガ な けれ ば , “GETUSER/ へ ジャ ンプ . 

BETUSER | 

「 ヒ B+2 | パラ メー タ は あつ だ が , それ は 2 桁 で ある か ど 

 。 , うか の チエ ッ フ . 1 桁 の 場合 は *SBYTE* へ ジャ 

SBYTE リンプ. 

OO0O ま 1111B 2 橋 の ASoI 入 力 を OFH ま で の HEX 形 式 に 変 

1O | 損 

532  、 ュー | 
スー フス ーー の ビッ ント の シス テム コー 

8 

OO09H | 

ーー 新しい ユー ザー・ エ リア に 移行 し な 後 , プロ グ 
ラム を 終了 し て CP ~M へ 戻る . 

9 1i1B |」 竹 の ASCI を HEX 形 式 に 変換 し , 

FNC マ っ | FNG3Z2 ハジ ャ ンジ . 

ピッ て | い コ ー ザ ー: コ ー ド の 取り 出し * の シス テム 

E。OFFH 

OOOS5H 

HEXDSPLY --- 取 り 出 し だ 値 を 表示 . 


プロ グラ ム を 終了 し て CP  M に 戻る . 


PSM 
RRC ! 
HOUT 1 
PBM 
OFH 

さ OH 

さ QH 
HOUT2 
ィ 
CUNOUT 


AR 
ooo5H 


1 
| 


RRC_ 


し A レ ジス タ の 値 を , 16 進 で 表示 する 
サン ブル ニー チン. 


A レ ジス タダ の アス キー・ コ ー ド を コン ソー ル 
に 表 が する サ プ ル ー チ ン . 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ーー ニー ニー ジン ーー be io クシ ュ シン 


ン :32 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


主 シ ステ ム ・ コ ー ル 徹 展 帰 説 


ファ ンク ショ ン :32 実習 プロ グラ ム の 実行 
当 プ ログ ラム を 実行 する コマ ンド 形式 を 次 に 示し ます . 


32 ま  ……… 現在 の ユー ザーNo を 調べ る 場合 
32 in 月 …… ユー ザー・ エ リア n を 移行 する 場合 . 


実行 例 と し て , ユー ザー・ エ リア (7) に , ファ イル を コピ ー す る 例 を 示し ます . 参考 と し て “USER" 
ンド 、 の まま AT ササン ド も 使っ て あり ます . 


QA>STAT USRs / 現状 の 確認 を し て お ぐ . 


Active User !k 0O 1 。。 
人 QACt 1 vg F 1 } ss O ( 0 以外 の ユー ザー・ エ リア に ファ イル は な い . 


A> さ 2 ) 実習 プロ プラ ム の 実行 (取り 出し ). 

OO -- 現在 の ユー ザー・ エ リア は 0 で ある . 上 の 結果 と 同じ 

A>DDT PIP.COM ) 他 の ユー ザー・ エ リア に ファ イル を コピ ー す る だ め に , まず DDT で `PIP. COM" を ロー ド . 
DDT VERS 2.2 

NEXT PC 

1EOO Q1OO 

ー^C リブ プー ト し て CP ン M に 戻る . 

A>USER 7) …- コ ー ザ ー・ エ リア 7 へ 移行 


ABAVE 29 PJP。CON ) 一 その エリ ア に `PIP . COM"” を セー プ . 


A>USER_O リ ) ュー ザー・ エ リア を 0 に 戻す . 
A>STAT USRs !) 現状 の 確認 . 


Active Umer ! O ーー コー ザー エリ ア は 0. 
Active Filesi O フ 7 ユー ザー・ エ リア 0 と 7 に ファ イル が 存在 する . 


和 の > スタ メリ 実 畔 プロ グラ ム に より の , ユー ザー・ エ リア 7 へ 移行 . 


AvDIR ) その エリ ア の ディ レク トリ を 見 る . 
As PiIP CDM 先ほど SAVE し だ ^PIP. COM" の み 存 在 す る . 


A>PIP Qi= さ 2.EDNEBOD]) PIP パ ラメ ー タ (G0) を 使 つて , 当 プ ログ ラム "32. COM" を 
ユー ジー エリ ルソン ビ コ ピ ビー グ る . 


A>DIR!) その 人 確 褒 
az PIP COM 』 32 COM 32.COM" ガ コピ ー さ れ て いる . 


も ロ 


シス テム ・ コ ー ル 徹底 実習 


A>32 7 ご の エリ ア に コピ ー さ れ だ 実習 プロ グラ ム に より , 現在 の ユー ザー・ エ リア を 調べ る . 
当 共 で は ある が , エリ ア 7 で ある . 


実習 プロ グラ ム に より , ユー ザー・ エ リア を 0 に 戻す . 


OO コー ザー ・ エ リア 0 に 戻 つて いる . 


n> 


Figure-2.2.61 ファ ンク ショ ン ・32 - 実習 プロ グラ ム の 実行 : 


CALL 手 順 
和 ( 三 21H) 
(8。 E セ ) FCB ア ルス 
CALL 0005H 
光 
(読み 出し が , 正常 に 行わ れ た 場合 は 。 A レ ジス タ に は 00 が , 正常 で な い 場合 は 、01 一 06 
の エラ ー・ コ ー ド が 格納 され て いる ) 


機能 

(D, E) レ ジス タ で アド レス され る FCB で 示さ れる ファ イル を , FCB の r0,。r1 フ ィ ー ル ド に セッ ト き る 
れ て いる レコ ー ド 番号 に 従っ て , ラン ダム に 読み 出す . 読み 出さ れ た レコ ー ド (128 バ イト ) は , DMA 
バッ ファ に 格納 され る . シー ケン シャ ル ・ リ ー ド の 場合 と 異な り ,。 レコ ー ド 番号 の 自動 イン クメン ト 
は 行わ れ な い . “ 

レコ ー ド 番号 は 2 バイ ト の 値 で あり , LSB は r0, MSB は r1 に セッ ト す る . フィ ー ル ド r2 に は , 最初 に 
00 を セッ ト し て お く 〈. 

当 フ ァ ン クシ ョ ン を CALL す る に は , まず , 目的 の ファ イル を オー プン し , r2 に 00 (最初 の み ) r0, r1 
に は 読み 出 そ も うと する レコ ー ド 番号 を セッ ト し て か ら 行 う . 

読み 出し が 正常 に 行わ れ た 場合 ,.A レ ジス タ に は 00 が 格納 され , 正常 に 行わ れ な か っ た 場合 は , 01-06 
の エラ ー・ コ ー ド が 格納 され る . エラー・ コ ー ド の 意味 を 次 に 示す . 


全 シ ステ ム ・ コ ー ル 徹底 解説 
00…… 正 常 な 読み 出し . 


と し た 場合 。 

02…… ラ ンダ ム ・ モ ー ド に な ら な い 場 合 . 

03…… 現 在 の ロジ カル ・ エ クス テン ト を クロ ー ズ で き な い 場合 . 

_04…… 登 録 き さて てい ない ロジ カル ・ エ クス テン ト ヘ シー ク し た 場合 . 

05…… 読 み 出し モー ド に な ら な い 場 合 。 

06…… フ ィ ジ カル な ディ スク の 最終 を 超え て シー ク し よう と し た 場合 (r2 が 00 で な い 場 合 に 発生 
する )、. 


実習 プロ グラ ム ファ ンク ショ ン : 33 


ラン ダム ・ リ ー ド を 行う プロ グラ ム を 作成 する . 
ここ で は ,「 ラ ンダ ム ・ リ ー ド が で きる 」 こ と の 基本 的 な 実習 が 目的 な の で , な る べく 理解 し 易 
いよ うに , 次 項 の 「 ラ ンダ ム な 書き 込み 」 で の 実習 プロ グラ ム と 同じ く , アド レス 4000H に あら 


か じ め 格 納 し て お いた レコ ー ド 番号 表 に 従っ て , ラン ダム ・ リ ー ド が 行わ れる プロ グラ ム を 作 
成す る . リー ド さ れ た レコ ー ド は , 順次 コン ソー ル に 出力 され て 行く . 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 湊 に 示し ます . 


^A>TYPE くささ.FRN / 


START: ] 

O1OO 1004O ヒ X』 AR し 0E 靖 お 軸 す べ ま し コー ガ 栓 だ まあ けし 人 
O103 228BO1 、 SHLD BETADR | 指し 示す ポイ ンタ に , 初期 値 4000H を スト ア . 

O106 OEOF MVI C。15 m | 

O108B 11S5COO LX 1 PFEP | コマ ンド ライ ン に を れ だ ファ イル の オー ブン 

O1QB CDO5OO CALL OOO5H 

O1OE FEFF CP 1 っ きき | 。 ーー 。 - 

O110 CA7101 2 ERROR 目的 の ファ イル が な い 場 合 は ^ERROR" ヘ ジャ ンプ . 

O11 さ AF XRA A ーーー = 

O114 ミ 27FOO STA FCB+35 | イール CNW の フト 


コン < 


シン ステ ハム ・ コ ー ル 徹 必 実習 


NXTRECs 
O117 2ABBO1 LHLD BSETADR 
O11A フ ビ MV A。M | 
ィ コ | - 2 、 。 
nm 2 7 An の ( 「0。r に レコ ー ド No. の テー プル か ら の レコ ー ド No. を セッ ツ ト . 
O11F 7E MOV AN | 
O120 さ 27EOO STA FCB+ さ 4 | 
| 
O123 FEFF CP QFFH いい r1 が FFH な ら ば , プロ グラ ム を 終了 . 
QO125 CAOQOQO コメ OoOoH | リプ ブー ト に し て CPZM に 戻る . 
O128 2 ミ INX H し 次 の レコ ー ド No. の 格納 され て いる アド レス 
O129 228BO 1 ら SHLD BETADR 「 を , ポイ ンタ に セッ ト . 
O12C OE21 MVI に 、3 さ ーー ーー 
O12E 115COO LX 1 _D。FCB  )` ラ ンダ ム な 読み 出し "の シス テム ・ コ ー ル , 
O1 さ 1 CDOS5QO CALL OoQ5H 
O1 さ 4 B7 DRA A | 正常 な 読み 出し が 行わ れ な い 場 合 は , 
O135 C27101 JNZ ERROR | ERROR" ヘ ジャ ンプ . 
X H。OOBOH | H, し レジ スタ に , DMA パ バッ ファ の 先頭 アド 
O13 昌 218OOO LX こ 2 
DIGPs 
O1 ミ SB 7E MOV Aa。M 
O13C CDS5OO1 CALL HE XDSPLY 
UM ^ | アド レス 80H ン FFH の 128 パ イト の 内 容 を 。 
・ 「 コン ソー ル へ タイ プ - ア ウト する . 
o140 7D MOV AL OR 
O141 B フ 7 QRA A 
O142 C2 さ BO1 JNZ D1SP 
O145 OEO の MV1 E。 9 
O147 118601 LX I D。MSGCRLF ) 敏 帰 ・ 改 行 の 出力 . 
O14A CDOSOO CALL OOOSH | 
O14D C ミ 17O1 JMP NXTREC 次 の レコ ー ド の 読み 出 レ ヘル ー プ . 
HEXDSPLY』 
O15O F5 PUSH PSM 
O151 OFOFOFOF RRC! RRC! RRC! RRC 
O155 CDS59O1 CALL HOUT 1 | 
O1SB F1 PDP PSM | 
O159 E6OF HOUT1』 ANI OFH ーー ンー ー 
Di Coo いい 0 , A レ ジス タ の 値 を , 16 進 で 表示 する 
- ザン ルーチン 
O15D FE さ A CFP 1 さ AQH | 
O1SF DA64O01 3C HOUT2 | 
O162 C60 フ 7 AD 1 。 | 
O164 CD68O1 HOUT2』 。 CALL CONDUT 
O167 C9 RET 
CONDUT s 
O168 E5 PUSH H | 
O169 OEO2 MV ヒ 。2 | ャ ィ 
O16B 5F MOV E。A | A レ ジス タ の アス キー コー に を コン ンー ル 
O16C CDOSOo CALL oooSH | に 出力 ける サブ プル ー チ ン . 
O16F E1 POP H 
O17O ヒラ 9 RET 


1 つづ 


全 シ ステ ハム ・ コ ー ル 徹 辰 解説 


Figure-2.2.62 ファ ンク ショ ン :33 実習 アロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


上 記 ソ ー ス ・ リ スト か ら ア セン プリ ・ ソ ー ス ・ フ ァイル を 作り , アセ ン ブ ル し , “33 . COM” を 生成 
に 0 丘 特 も で あま し ょ う 。 


ファ ンク ショ ン : 33 実習 プロ グラ ム の 実行 


当 プ ログ ラム を 実行 する 前 に 。 まず , ラン ダム ・ リ ー ド を 行う た め の レ コー ド 番 号 表 を , アド レス 
4000H か ら の エリ ア に ロー ド し て お きま す . ( 

レコ ー ド 番号 表 が ロー ド で きた ら ,。 当 プ ログ ラム を 実行 し ます . 実行 する コマ ンド 形式 を 次 に 示し 
素人 す 、 の | 


( 33_.X : filename . ext 朋 …… ドラ イブ x : 上 の ファ イル `filename . ext” を , アド レス 4000 
か ら の レコ ー ド 番号 表 に 従っ て ラン ダム ・ リ ー 宇 し , まっ 0 ウ 
ト す る . | SG 聞 


実行 例 と し て , 次 項 で 解説 する ファ ンク ショ ン : 34「 ラ ンダ ム な 書き 込み 」 で の 実習 で 作成 し た ラ 
ンダ ムフフ ァイル "TBST RND を 、 競 み 出 し て , コッ ジー ル に ま イ アア ウト し て あま し を 【 先 
に 次 項 を 実習 し て 下さ い ). | 

読み 出す 順 詳 は 。 書き 込み を 行っ た ラン ダム ・ レ コー ド と 同じ 順序 で (アド レス 4000H か ら の 内 容 ) 
で 行い ます の で , タイ プア ウト は , 00, 01, …… 0C の 順に , 128 バ イト ずつ 行わ れる は ず で す . 

この 実行 例 を 次 に 示し ます . | 


1 オノ 


ADDT RND.HEX / ラン ダム ・ レ コー ド No. の テー プル を ロー ド 〈RND. HEX に つい て は , 
DDT VERS 2.2 次 寺 の ファ ンク ショ ン : 34 を 参照 ). 

NEXT FC 

40Q1C OOOQ 当 プ ログ ラム で は , ラン ダム ハム ・ レ コー ド No. の テー プル は 4000Hー ビ 設定 し て ある . 
ー^ ビ ーーー-DDT を 終わ る . 


A>DIR Bs/  - 読み 出 そ う と し て いる ファ イル の 確認 . 
Bs TEGST RND 


Q > ささ BsTEST.RND / 
QooOO000Q0O0OQOQ00OQOQOOQooooooooooooooooooooooooooooooooooooooooooooooooooooooooQoQo 
QOOOO0OOOQOOQOOQQOQQQOQOOO0QQQoooOoooooQooooooooooooooooooooooooooooooooooooooooooo 


O00QQOQQOOQOQQOO0Q0Q0QQQQooQooooooooooooooooooooooooooooooooooooooooooooooooooooooo 
OOOOOOOQOOOOOQOOO 


01O1O01010101010101Q1010101Q1O101Q10O1010101010Q1010101010101O010101O10101Q1O1Q1Q101 
9101010101010101010101010101OQ10101O10101010101O010101010101010101010101Q01O10101O1 


QO1O1010101010101010101O10101O101O1O1Q1Q1QO101O1O10101O101010101010101010101010101 
0101O1O101010101 


0202O0SO2O2O20202020202020202020202020202020202020202020202020202020202020202O0202 
02Z020Z0202020202020202020202020202020202020202020202020202020202020202020202O202 


02ZOZO020ZO2O202020202020202020202020202020202020202020202020202020202Q020202O2O202 
Q02O02020202020202 


りさ O さ O さ 0 ひ 3 〇 さ 〇 きる O 〇 30O さ O 〇 O さ Q さ SO さ O さ SO さ 〇 さ O 〇 O さ OQ さ Q さ Q さ Q さ OSO さ O さ O 〇 さ Q さ Q さ O さ OQ さ 〇 さ 〇 さ 〇 さ Q さ O さ O 〇 さ O 〇 O さ O さ O さ O さ 0O さ O さ O ミ 
03030303O さ OS3O さ Q303O さ Q さ OSO さ Q さ SO さ Q さ O さ Q さ る O 〇 さ Q さ Q さ 〇 さ O 〇 る O さ O さ る O さ O 〇 る 〇 さ 〇 さ 〇 さ O 〇 3O さ O さ O さ O さ O さ O さ O さ OO ミ 


Q さ QOSQ さ O さ ひさ 〇 Q さ Q さ O さ O さ 3Q さ O く O さ Q さ O さ O 〇 さ Q さ O さ O さ Q さ Q さ O さ O さ O さ O さ O さ O さ Q さ O さ Q さ O さ O さ SO さ O さ ひさ O 〇 さ Q さ Q ミ O さ Q さ O マ 
QO さ 3O さ O さ 0 さ O さ OQ さ 0 さ O さ 


Q404Q4Q4Q40404Q40404040404Q40404040404O404Q4Q404Q4040404040404Q40404040404O4Q404 
04040404040404Q04040404040404040404Q40404040404040404040404Q40404O4040404040404O4 


O40404Q4Q4Q4040404Q40404Q4Q4040404O40404Q4O04040404O4040404Q4040404040404O04Q40404 
O404040404040404 


OSQSOSOSOSQSoOSoSoQSO5O5SQ5o5Q5Q5o5o5o5Q5o5Qo5Q5o5QSQ5Q5QO5Q5O5o5o5O5Q5SQO5Q5O5O5QO5OSO5 
OSQOSQSOSOSQSQ5Q5SQ5QO5o5O5QS5QSo5o5o5o5oSo5oSoSo5o5oO5O5O5O5O5O5O5O5O5O5O5OSOSO5OSO5 


QOSOSOSOSOSQSOSQSOSQOSQSQ5OSQ5QSQSQOSO5QSO5OSQ5QOSOSOSO5QSO5QSQ5O5O5OSO5O5SQSQOSQ5OSOQ5 
QOSOSOSQSOQOSOSQ5Q5 


06060606O0606060606Q6060606Q606O6O6Q6Q6O6O6060606O6Q6Q6Q6Q06O6Q606O6Q060606Q6O606Q06 
06060606060606060Q606060606QO606Q60Q6O6Q6O6Q6O6Q606Q606Q0606O6O6O606O6060606060606QO6 


060606Q60606060606Q6060606Q6Q6Q606Q6Q6QO6Q6O6Q606060606O606Q60606O6060606O6O60606 
0O60O606O6Q6Q6Q6Q6 


070707070707Q07070707070707070707070707070O7O7070707O7O7O7Q フ 7O7070707070 フ 7070707070 フ 
0707070707070707070707070707070707O707O07O70707O70707O7070707O7O7O7O7070707Q フ 07O フ 7 


070707070707070707070707070707070707O707O7O7O70707070707O7O7O7O7O7O7O707O7O7O7O フ 
O707070707O07Q7O フ 7 


QBOBOBOBOBOBOBOBQBQO ヨ OBQOBOBOBOBOBOBQOBQBQBOBQOBOBOBOBQOBQBOBQBOBOBQBQBQBQBOBOBQO ヨ OO 
OBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBQOBQBQBOBQOBOBOQOBOBOBOBOBOBOBOBOBQBQOBOBOBOBOBOBOBOB 


OBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBQOBQOBQBOBQBQBOBOBOBOBOBOBo コ oo 
OBOBOBOBOBOB ヨ OO 


020909090909090909Q9Q90909090909O9Q9O9QO9QO9O9O909O9O9O9090909Q909QO9QO909Q9O9O90909 
09090909090909090909O909090909090909O9090909O9O909090909090909O909090O909090909O9 


09090909090909090909090909Q9090909090909090O9090909Q90909090Q9090909O9090909090909 
0909090909090909 


1 つら 


全 シ ステ ハム ・ コ ー ル 徹底 解 計 


OAOAOAOAQOAOAOAOAOAOAOAOAOAOAOAQAQAOAOAQAQAQAQAOAQAQAOAOAOAOAOAOAQAOAOAOaOAOAOAQOA 
OAOAOAOAOAOAQOAOAOAOAOAOAOAOAQOAOAOAQOAOAOAOAOAQOAOAOAQAQOAOAOAQAOAOAOAOAOAOAOAOAOAOA 
QRQAQAOAOAOAOAQAQOAOAOAOAOAOAOAQAOAOAOAOAOAQAOAOAOAOAQOAOAOAQOAOAOAOAOAOAOAOAOAQAOA 
QAOAOAOROAOAOAOA 


OBOBOBOBOBOBOBOBOBQOBOBOBOBQBQBOBOBQBQBOBOBOBOBOBQBOBOBOBOBOBOBOBOBOBOBOBOBOBQOBOB 
OBOBOBOBOBOBOBOBOQOBOBQOBQOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBQOBOBOBOBOBOBOBOBOBOBOBOBOBOB 
OBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBQOBQOBOBQOBOBOBQBOB 
OBOBOBOBOBOBOBOB -、 


OCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCEOCOCOCOCOCOCOCOCOCOCOCOCOC 
QOCOCOCOEOCOCOCOCEOCOCOCOCOCOCOCOCQOCOCOEOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOCOC 
QCOCOCOCOCOCOCOCOCOCOCOEOCOEQCOCOCOCOCOCOCOCOCOCOCOCOCQOCQCQCOCOCOCOCOCOCOCOCOCOC 
OCOCOCOCOCOCOCEOC 


所 衝 お お 生 (/  C の 00 つ 0C 
の 順序 か ら 分 か る . 


Figure-2.2.63 ファ ンク ショ ン :33 実習 プロ グラ ム の 実行 . 


ファ ンク ショ ン : 934… ラ ンダ ム な 書き 込み 


CALL 手 順 
M VI し じ 、 3 も ( 三 22 是 ) 
(D, E) FCB ア ドレ ス 
CALL 0005H 
党 
(書き 込み が 正常 に 行わ れ た 場合 は , A レ ジス タ に 00 が , 正常 で な い 場 合 は , 01-ー06 の エ 
フー・ コ ー ド が 格納 され て いる ) 
機能 
DMA バ ッ フ ァ (デフォー ルト は, 80H-ーFFH) の 内 容 を FCB の r0, r1 フ ィ ー ル ド に セッ ト さ れ て いる 
ディ スク 上 の レコ ー ド 番号 に 書き 込む ' 
詳細 は , 読み出し” が “書き 込み 2? と な る だ け で , 前 項 の ファ ンク ショ ン : 33「 ラ ンダ ム な 読み 出し 」 
と 同様 で ある . 前 項 を 参照 . 
だ だ し 。。 エ ター・ コ ー ド 05 の み は 起 味 が 上 異な り , ディ レク トリ が フル と な っ て , これ 以上 新しい ば ロジ 
カル = エタ ステ ント を 作る こと が でき を めい こよ. を 示す 。 


1 


実習 プロ グラ ム ファ ンク ショ ン : 34 


システム ・ コ ー ル 徹 辰 実習 


ラン ダム ・ ア クセ ス の 基本 動作 を 理解 する た め に , ラン ダム な か 任意 の レコ ー ド 番号 に デー タ を 
書き 込ん で 行き を , ラン ダム ・ フ ァイル を 作成 する プロ グラ ム を 作成 する . 

分 か り 易 くす る た め に , ラン ダム な 任意 の レコ ー ド 番号 は , アク セス する 順に , アド レス 4000 
H か ら の エリ ア に 事前 に ロー ド し て お く 〈 く . この レコ ー ド 番号 表 は , 当 プ ログ ラム で は , 何 の 意味 
も な い 適 当 な レコ ー ド 番号 を 並べ て お くだ け で ある が , 本 来 の ラン ダム ・ ア クセ ス を 利用 し た 
プロ グラ ム で は , 例え ば 住所 録 や 。 ワー ド プ ロ セ ッ サ の 辞書" な どの 検索 の た め の パリ ファ 


レン ス ・ テ ー プ ブル (対応 表 ) で ある . 


まず , この レコ ー ド 番号 を 並べ た テー ブル を 作る . DDT の S コ マン ド で , 直接 書き 込ん で 行っ 
て も 良い が , 見 て 分 か り 易 いよ うに , エディ タ と アセ ンプ ブラ を 使っ て ラン ダム な レコ ー ド 番号 


を 作成 し た . 


ファ イル 名 を “RND . ASM” と し て アセ ン ブ ル し , で きた RND . HEX′ を DDT を 使っ て 4000H 
に ロー ド し ます (ORG が 4000H と し て ある の で , 自動 的 に 4000H か ら ロ ー ド され る ). “RND. ASM? 
を アセ ンプ ブル し て で きた PRN フ ァイル “RND . PRN” を 次 に 示し ます . 


A>TYPE_RND.PRN ! 


40QO 


40QO 
40Q2 
40O4 


4006 
400 晶 
4OO^A 


Figure-2.2.64 


0RG 


Du 
DuM 
DM 
= ご の , 台 計 13 レ 
コー ド の ラン ダム な DW 
レコ ー ド 番号 を , ア DM 
ドレ ス 4000H か ら の DM 
エリ ア に ロー ドレ て 
お ぐ . DM 
DM 
DM 


DM 
DM 
DM 
DM 
DM 


END 


Aa ス > 母 人 NG テーU で 中 中 


400QOH 


OO ま OOh 
OO*$OQ1h 
OO ま $O2h 


O1 あ 人 Q6h 
O1 $ASh 


DDT で , アド レス 4000H は ひら ロー ド さ れる よう に , 
ORG は 4000H と し て お ぐ . 
0 、 


01 
02 


03 
04 


O1$47h 05 


O2$1Bh 6 


O2* ま 1Ah 
02 ま 17h 


OO*$ 人 7h 
OOQO ま ASh 
OO$ う Oh 


ーー 賠 え ば これ は , レ コー ド 秋 号 28H(10 赤 で 535) を 表す 
7 


06 


09 
0A 
0B 


OQW2Bh 0C ーー 
OFF$FFh- キー テー ブル の 終わ り を 示す . 


この 値 を それ ぞ れ の レコ ー ド 番号 に 書き 込 も うと する 。. 


ゃ 


ラン ダム ・ レ コー ド 表 を 作る た め の ア セン プリ ・ ソ ー ス ・ フ ァイル . 


全 シ ステ ハム ・ コ ー ル 徹底 衣 説 


プロ グラ ム は , ア ドレ ス 4000H か ら ロ ー ド され る この ラン ダム な レコ ー ド 番号 の 順に ディ スク を アク 

セス し , DAM バ ッ フ ァ 上 の 128 バ イト の デー タ を 書き 込 で 行き ます . 書き 込む デー タ は , 結果 の 確 
認 が し 易い よう に 1 レコ ー ド , オー ル 00 か ら 始 まり , 1 レコ ー ド ご と に 01, 02、03 と イン クリ メン ト 
し て 行き ます . 1 レコ ー ド の 128 バ イト は , すべ て 同じ 値 で す . 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 湊 に 示し ます . 


Q>TYPE さ 4.FRN 』/ 


く TXEIVOTCOC7TC レ 5 く 5 ミニ 3 す て 7LIIR1TTT1TTTY 。 
] FUNCTIDN 34: MRITE RANDDN 5 
cc 5 

O1OO DRG 1 OOH 

OO5C = FCB EQU OO5CH FCB ア ドレ ス は , デフォー ルト の 5CH に 設定 . 
START: ーー - 

otoo 21oo4o  . し X I H。 4QooH | レコ ー ド 番号 表 か ら , 災 々 と レコ ゴー ド に No. を 

O103 2274O01 SHLD GETAph | 必 り 出 は を め の ア ドレ ス ・ ボ ポインツ "GET- 

ADR” に ビ , 初期 値 4000H を セツ ト 、. 

Q106 aF XRA い | 和 名 レコ ー ド に 書き 込む デー タ を 格納 する パ バ 

0107 327601 STA MTPATTN 「 ソフ > い wTPATTN/ に 。 初 期 値 *00" を セッ ト . 

O1OA_OE16 MVI ビュ ズブ | FCB に 格納 され て いる ファ イル (コマ ンド ・ 

O10C 11SCOO LX 1 D。FCB | ライ ン に 記述 し を た フ ァイル) を 新 だ に 作成 す 

O1OF CDOSOQ CALL QQQ5H る . 

O112 FEFF CP 1 っ 55 ディ レフ トリ が いつ ば いて で 作成 で き な い 場 合 

Q114 CA4FQ1 JZ ERROR 「 は 。 ERROR" に ジャン 

0117 AF XRA 穫 | FCB の *r2? フ ィ ー ル ド に 00 を セッ ト し て お 

Q11B さ 27FQQ STA ド FCB+SS | ぐ . 

NXTREC 

Q11B 21 ヨ OQO LXI H。BOH 

Q11E る Q7601 LDA MTPATTN 

O121 4F MOV CA 

デフ オー ルト の DMA/ ャ ソフ ア , 80HーFFH の 
BUFLUOF | 128 バ イト を , 書き 込み デー タ 用 パッ ファ ^W- 

0122 71 MQV M。C | TPATTN" に 格納 され て いる 1 パイ に ト の デー ツマ 

の 12 く 2 さこ INX H | で フィ ル す る (うめ る ). 

O124 7D MV お 。L | 

O125 B フ 7 ORA AA . | 

O126 C222O1 JNZ BUFLOOP 

キー ee に | 書き 込み 用 デー タ の 値 を 1 つ イ ンク フリ メン ト 

ソー ダグ ンー リン し 「 し WTPATTN" に 格納 

O12B さ 327601 STA MTPATTN ご 。 

PUTROR1 : 

O12E 2A74O1 LHLD BETADR 

O1 さ 1 7E MQV A。 NM | アド レス 4000H み ら の じ コ ー ド すら 

O132 さく 27DOO GTA FCB+33 | アド レス ・ ポ イン タ ^GETADR" の 指し 示す レ 

Q1 さ 5 2 さ INX H ADES rOr17 フ 

Q1 さ 6 7E MOV に | ィ ー ル に ド へ セツ ト す る . 

O1 さ 7 さ 27EQO STA FCB+ さ 4 

O1 さ QA FEFF CP 1 OFFH | い r1? の 値 が FFH の 場合 は , レコ ー ド 番号 表 の 

013C Ca5BQO1 JZ CLDSE | 終了 を 示す の で ,^CLOSE" ヘ ジャ ンプ . 


シス テム ・ コ ー ル 徹 克 実 泊 


OQ1 さ F 2 さ INX H YY TTY コン OO。 
0440 2 っ 20401 uh cs 。 の 2 レコード に アド レス ボ ポインツ を ピット 
O14 さ OE22 MV に 、 さ 4 | 
QO145 115CQO LX 1 D。FCBE * ラ ンダ ム な 書き 込み / の シス テム ・ コ ー ル . 
Q148 CDOSOo CALL QQO5H 
O14B B フ RA ^A 正常 に 書き 込み が 行わ れ ね だ 場合 は , “NXT- 
O14C CA1BO 1 コア NXTREC じ JREC へ シャ ンプ レ , ループ 、 
ERROR s 
O14F OEQO9 MV 1 C。9 ーー ご ーー 
9 エラ ー・ メ ッ ツ セ ー ジ を 出力 し , プロ グラ ム ム を 終 
Q151 11680O1 LXI D,。MSGERR | し て GP ノ M へ 戻る . 
Oo1554 CDOSOO CALL OOQO5H 
O157 C9 RET 
CLUDGE 
O15B OE1O MVI に 16 | 
O15A 115COO LX 1 D。FCB |_ 、 。 て 
| ファ イル ・ フ ロー ズ の シス テム ・ コ ー ル . 
YY ーー ンー ン ロ こ な 絆 わ に の JMA に W に ま 記 これ を 。 
0H に ジャ ンプ し レ し, プー ト し て COCP M に に 戻 人 SS SS 
016O FEFF CP1 < ご ら で き な い 場合 は ERR-OR/ に ジャ ンプ 
O162 CA4FO1 J メ ERROR 
O165 C さ OOOO JMF QOOO 
QO168 ODOQn455252 MSGERR』 DB QDH。 QAH。" ERRUR !"。ODH。OQH。 
Q174 GETADR:z DS 2 
0O176 MTPATTN』 DS 1 
O177 END 


に 放 ufe-2.2.09 。 ファ ンク ショ ン :34 実習 プロ グラ ム の PR 形式 の ソー ス ・ り えよ 。 


E 記 ソー スッ サス 上 ト 上 ト か ら ア セン プリ ・ ソ ーー 区 * フ ァイル を 作り , アセ ンズ ブル ヒ し, 04 し ON を 生成 
に を 業 和 も る 首 ま と よう 。 


ファ ンク ショ ン : 34 実習 プロ グラ ム の 実行 


新た だ に フォ ー マ ヤッ ト し た 空 ア ディスケット を ライプ ズ 公 : に セッ ト し, 当 プ ログ ラム を 実 邊 し て み ま 
EE 

当 プ ログ ラム の 実行 に は , NEC の PC-8001GP/M を 使い まし た . この CPM に は , ディ スク の " ス 
キュ ー” が な く , フィ ジ カ ル な セク タ No 順 に リー ドラ イト が 行わ れる の で , 当 プ ログ ラム の 実行 結 
抄 を 解説 する 際 。 ラン ダム ・ レ コー ド 番 号 , ディ レク トリ の デー タ , 実際 の セク タ の 関係 が 分 か り 易 
く な る の て で て 好都合 で す . 

当 プ ログ ラフ ム の 実行 に は , 事前 に ラン ダム ・ レ コー ド 番 号 の 表 を アド レス 4000H か ら ロ ー ド し て お き 
ます 。 

まず , その 実行 例 か ら 示し ます . 


主 シ ステ ハム ・ コ ー ル 徹 克 衣 説 


AA>DDT RND。HEX ) ^RND. HEX" を DDT を 使っ つて ロー ドレ し , これ を ラン ダム 番号 表 と し て 使用 する . 


ソー ス ・ フ ァイル ^RND. ASM" の ^ORG” は , 4000H と し て ある の で , ラン ダム 番号 表 は 
DDT VERG 2。.2 自動 的 に 4000H か みか ら ロー ド さ れる . 
和 だ XT PC 
401 じ QOOO 
-D4QQOO。4O2F 7 ロー に ド され だ ラン ダム 番号 の 確認 . 0000,0001.0002,01A6, と, ロード され て いる . 
000 OD OOO41 OO 0 スズ OO 有 AA 0O1 AO】 47 01 1 02 1 有 AA 02 。、。、。。、。。。 ょ 。 > 
4O01O 17 O2 AZ7 QO AS OQO さ O OOQ 2B QO FF FF QOQO 0OO 0O OO  。。。 し 
402Q OO QO QQ OO OO OO QQ QO QQO QQO QQ OO QQ QO OO QO 。。-- 2: 科 2 泊 入江 

bo 


仙 > 


Figure-2.2.66 ラン ダム ・ レ コー ド 番 号 表 を , アド レス 4000H か ら ロ ー ド し て お く . 


ラン ダム ・ レ コー ド 番 号 表 が ロー ド さ れ た の で , 当 デ ログ ラム を 実行 し て み ま し ょ う .: 
実行 する た め の コ マン ド 形 式 を 次 に 示し ます . ( 
34..X : filename.ext す …… ドラ イブ x : 上 に , ラン ダム ・ フ ァイル “filename . ext” が 作ら 


れる . 
実行 例 を 次 に 示し ます . 


人 > さ 34 BsTEST.RND / 実習 プロ グラ ハム の 実行 . ファ イル 名 *TEST. RND" の ラン ダム ・ ア クセ ス ・ フ ァイル 
が 、 ド ライ ブ B - 上 に 作ら れる 、. 


QA>STAT BskTEST.RND / ドラ イブ B : 上 に 作ら れ だ , ラン ダム ・ フ ァイル "TEST. RND” の 確 語 . 


の 0 トッ 珠 は 13 レ コー ド の み 書 き 込 み ガ わ れ だ ファ イル で ある の に 
227 に 1 ちら R/M BsTEST.RND だ ブフ SR 
nt On BL 293t レコ ー ド 数 : 227 バイ ト 数 :8K, エ クス テン ト 数 :5 と 表示 され 

る の も 


> 


Figure-2.2.67 ファ ンク ショ ン :34 実習 プロ グラ ム の 実行 . 


ラン グ な ・ プ ティ イル が 。 堂 の ディ スケ ッ ト 上 に 作ら れ ま し た . 

で は ラッ テム ・ ツ ファ イル と は どの よう な も の で な ある の か 、 ます レコ ー ド 本 ーー ディ ル グ + リ 
ー 一 実際 の トラ ッ ク ・ セ クタ 番号 」 の 関係 か ら 解説 し て 行き まし ょ う . 

まず , “34 , COM” の 実行 に よっ て 作ら れ た ラン ダム ・ フ ァイル , “TEST . RND" の ディ レク トリ 
を , シン クウ ェ ア ・ ラ ブ ズ 社 の セク タ ・ デ ィ ス プレ イ ・ プ ログ ラム を 使っ て 調べ て み ま す . 空 の ディ 
スケ ッ ト 上 に 作ら れ た ファ イル な の で , 8 イン チ ナチ 標準 ディ スク や PC-8001 の 1W (片面 ) で は , ディ レ 
クト リ 部 の 先頭 で ある, トラ ッ ク 02 の セク タ 01 か ら , “TEST . RND" の ディ レク トリ が 記録 され て い 
る は ず で す . その ディ レク トリ 部 の 様子 を 次 に 示し ます . 
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>SECDIG) 
に に だ コ SECTUR _ DISPLAY PROGRAM  V1. 呈 
for PC ヒ - 晶 OOQ 1 CPZM 
COpyright by SYNCMARE LABS 


input diwk name ^A-ーD >B 
1nDut trac ド 醍 OQO- さ 4 >02 
1 nDut smCtOr 香 O1- さ 2 >O1 
D) isp1 ay。 N) @xt sector disDp。。 
1 npDut 0。 NM。 内 。 XX、 上 。 >D 


ーーー 


仙 ) uu 上 O next 。 


DiSGK=B TRACK=O2 
に # 9【9」 
BI 1QO 
B』 20 
Bi さ O 
Bi 4O 
Bi SO 
B』 6O 
Bs 7O 


SECTUR=O1 
の S4 45S き さ 54 2O 20 20 20 52 4E 44「QOQl oo oo は 1 


QO 54 45 5 さ 54 2o 2o 2o 2o 52 4E 44|o2|oo oo [48 
49 20 20 20 20 s2 44 53106 Go 
OO 54 45 SS 54 2O 20 2o 2o 52 4E 44[o4| oo oo [1B 
60_00.O の 68) 00 00 GO GO OO OO_GO_0O_oo 09_O9_eo 
DISK=B TRACK=O2 。 SECTOR=O2 
BOO OO 54 45 5 さ 54 2O 2Q 2o 2o 52 4E 44|Qiloo oo 
Bi 10 [60_00 GO 60 G の G9_GG 69 69 G9- 09- 00_990-99_ool 
Bi20 ES ES E5 ES E5 ES5 E5 ES E5 ES E5 E5 E5 E5 ES ES 
B+ さ 3O ES ES E5 ES E5 ES E5 E5 ES E5 E5 ES5 ES E5 ES ES 
Bi40 ES ES ES E5 E5 E5 ES ES5 ES E5 E5 E5 E5 E5 ES ES 
BS5O ES ES ES ES E5 E5 E5 E5 E5 E5 E5 E5 ES5 E5 ES ES 
ES E5 ES E5 E5 ES ES ES5 E5 E5 ES E5 E5 E5 ES ES 


Bs 6OQ 
Ba7O ES ES ES ES ES E5 ES5 ES E5 E5 E5 E5 E5 E5 E5 E5 


Figure-2.2.66 ファ イル “TEST . RND′” の ディ レク トリ 部 の セク タ ・ 


実 音 プロ グラ ム に よっ て 作ら れ た ラン ダム ・ フ ァイル まま 生 SE RNDY に 上 っ て 、 
エク ステ ント (1 ロジ カル ・ エ クス テン ト は 32 バ イト か ら 成 る ) が 生成 され て いる こと に 


さい . さら に 注目 する 箇所 は , それ ぞ れ の エク ステ ント の , 


13 バ イト 目 …… そ の エク ステ ント の 番号 (0031 10 進 ). 
16 バ イト 目 …… そ の エク ステ ント 中 で 使用 され た レ 
17 バ イト 目 一 32 バ イト 目 …… ア ロケ ーション ・ マ ッ プ | 


X ) any se に も ロレ 


TEST 


グー 


シス テハ ・ コ ー ル 徹底 実習 


R) eb@ot CP/M 


に TEST _-- RND。 し 1 
。TEST 
TEST 


・TEST 


RND 。 。 。 " 
RND . 。 . H 


RND 。 。 。 。 


RND 。 。 . ( 


い ) 


もつ の ロジ カル ・ 
注目 し て 下 


コー ド 数 (1 -128 10 進 ). 


で あぁ あり, それぞれ の アロ ケー ショ ン ・ マ ッ プ の “ 〇 ? 印 の 値 と , その 位置 に も 注目 し て 下さ きい. 
挫 に , この ディ レク トリ の 注目 すべ き 部 分 を , 分 か り 易 く 書 き 移 し た 表 を 示し ます . それ ぞ れ の エ 


クス テン ト の 13 バ イト 目 (エク ステ ント 番号 ) を 左端 
各 エ クス テン ト を 1 行 で 示し て あり ます . 


に , 16 バ イト 目 ( レ 


コー ド 数 ) を 右端 に 置い て 


131 


主 シ ステ ム ・ コ ー ル 徹 展 帰 説 


13 バ イト 目 の 値 を 16 バ イト 目 の 値 を 
こ に 移 し だ も の . ご ここ に 移し た も の . 
pisk-s TRACK=O2 。 SECTOR=o1 プイ ス フ ・ ア ロケ ーション ・ マ ッ プ | 

22282 28 エー ヤシ ニニ つつ _ー_0 つ つ つ ブ 0 ブフ 0† い 「q - つこ ーー 


| 
OO 。 OO OO OO GO  QD  QoQO QO 6O 「 Sn 1 


3 4 46 90 0 的 66 0 パロ |!aT フ ステ ッ ト ! 
de タ 邊 の の の Ph uo た きく 


OO O0 OO OO 0O OO 900 90 00 00 ( 作 / 
1A8 1B0 1B8 1CO 1C8 1D0 1D8 1EO 1EB 1FO 1F8 紹 親 22 ラ ッ ト 
167 1BF 1C/ 1CF 1 1 1 17/ 1FFK 2 
KO】 10 り OO 0O GOO 60 OO 00 QO 
7 目 1400 108 110 448 120 128 430 1 
137 13F 
QQO  QOQO 


KQQ】 I(Q② QQO QQO QQ QO (Q⑦ 
日) 08 0 8 20 |2 
M / 


0 (1 グ 12 


サメ 


_Q00 6 00 6O 


1 220 226 290 2 2 246 250 2 200 208 20 の 記 ロコ lg エフ ステ バト 
フス テン ト ! 207/ の 21/ 22/ 2ZF 20/ 20F 2 24F の 6/ 2 た 67 068 2 の / 27F N」 レコ ー ド 


| 
| 
| 
( ! 
KoO1)] loo oo oo oo 6 oo oo oo oo oo oo oo oo oo oo SN 
1 番 上 日 」80 86 90 98 |A0| A8 BO B8 CO C8 DO DB8 印 BB PO PB | 当 F2 ス テッ ト 
の ロジ カル ・, | | | | | | | | | | | | | | | 品 。 四 0 1 
エフ ステ ント のり 。 F 7 9 2 ツウ BE CC 2 の ウ 記 FF 中 al 
) 


4 ) | を ES E5 ES ES9 ES 55 E59 6 ER 3 6 6 5 | に 5 


| 
まだ 作ら れ て いな い ロ ジ カ ル ・ エ クス テン ト 
| 


。 4 

ロジ カル ・ エ クス テン ト の 番号 それ ぞ れ の エク ステ ント 中 で 
使用 まれ だ レ コー ド 数 (HEX) . 
この 例 で は 含 計 =49+39+72 
+2/+40=227(10 進 ) と な り の , 
.6/ の “Recs” の 


Figure-2.2.69 「 エ クス テン ト 番 号 一 一 アロ ケー ショ ン ・ マ ッ プ ・ レ コー ドド 番号 一 一 含ま れる レコ ー ド ' 
数 」 の 関係 . 


この 表 を 基 に , ラン ダム ・ フ ァイル の 詳細 な 解説 に 入り まし ょ う ). 

まず 8 イン チ ナチ 標 準 デ ィ ス ク で は , 1 ロジ カル ・ エ クス テン ト で 16K バ イト の ディ スク 上 の デー タ を 
邊 電 する こと が で きま す ., 各 エ クス テン ト に ,。 16 バ イト の ディ スク ・ デ ロケ グー シ ョ ン ・ マ ッ プ が あり , 
その 1 バイ ト が ディ スク 上 の 1K バ イト の ブロ ッ ク を マッ ピン グ (指し 示す ) する た め , 16 バ イト で 16 
K バ イト の ディ スク 上 の エリ ア を 管理 で きる 訳 で す . 

ラン ダム ・ フ ァイル で は 。 シー ケン シャ ル ・ フ ァイル と 異な り ,。 ロジ カル ・ エ クス テン ト の 番号 が , 
4 6 や" と , 順番 通り に は 並び ませ ん . Figure-2.2.69 の 例 で は , 00, 03, 02, 04, 01 と いう 
順に な っ て いま す . 


シス テム ・ コ ー ル 徹底 実習 


また , ディ スク ・ ア ロケ ーション ・ マ ッ プ 上 で も , シー ケン シャ ル ・ フ ァイル の よう に , 左 か ら 順 
に マッ ピン グ さ れ て いる 訳 で は あり ませ ん . 中 抜け で ,。 と びと びに マッ ピン グ さ れ て いま す . 

Figure-2.2.08 お よび Figure-2.2.69 で , 4 番目 の エク ステ ント に つい て 説明 し まし ょ う . この エク 
ステ ント の 16 バ イト は , 次 の よう に な っ て いま す . 


00TESTOO こ ここ 、、,RND0O40OO0OO18 
00 00 06 05 00 00 00 00 00 00 00 00 00 00 00 00 


13 バ イト 目 の エ クス テン ト 番 号 が “04′ で ある と いう こと は , その エク ステ ント が 04X128=04 メ 
80 (HEX) =200 (HEX) 台 の 128 個 の レコ ー ド を 管理 する こと を 示し て いま す . つま り , レコ ー ド 番 
号 の 200 (HEX) -27F (HEX) を , この 4 番目 の エク ステ ント が 管理 する の で す . 

そし て , アロ ケー ショ ン ・ マ ッ プ の 3 バイ ト 目 の “06” と いう 値 は , この 3 バイ ト 目 , つま り レ コ 
ー ド 番号 の 210 (HEXX) 一 217 (HEX) の 8 レコー ド が , ディ スク 上 の 1K バ イト 単位 の 位置 を 示す , 
プ ブロック 06 (8 イン チ 標 準 デ ヂ ディ スク で は , 1 ブロック は 8 レコ ー ド =1K バ イト ) に 当っ て いる こと を 
示し て いま す . 

アロ ケー ショ ン ・ マ ッ プ の 4 バイ ト 目 の “05” は , 同じ く 当 ファ イル の レコ ー ド 番号 218 (HEX) 21 
F (HEX) の 8 レコ ー ド が , ディ スク 上 の ブロ ッ ク 05 に 当っ て いる こと を 示し て いま す . 

プ ブロッ ク 番 号 は , 00 か ら 始 まり , デ ィ レ クト リ ・ エ リア の 先頭 を 00 と し て , 8 セク タ ご と に 01,02,…… 
と な り ま す . よっ て , 8 イン チ 標 準 デ ィ ス ク や PC-8001CP ン M (1W) で は , 次 の 表 の よう に な り ま す . 


( 注 ) 標 準 デ ィ ス ク は , こ の 表 の 値 に スキ ュー 変換 し た も の が , 物理 的 な セク タ 番 号 と な り ま す . 
1 実際 の トラ ッ ク , セク タ 番 号 

ブロ ッ ク 番 号 | 通算 セク タ 番 号 標準 ディ スク PC 一 800I1(IW) デ ィ ス ク 
26 セ クタ /| ト ラッ ク る | 32 セ クタ /! ト ラッ ク ( ス キュ ー な し ) 


ーー ドド に ド ドド ド 四 ゞ ド ド 上 靖 ニー に 上 ビ ビ ニ ニー ドー ニニ ピピ 六 ィ ッッ ぱ ニ ビ む 』 ゞ ビ ド ド ド ド モ シ ジ テ ビビ ドド ドド キ ェ ーー ビ ーー ニニ 9 ニニ ーー ニニ ニー ニー ニー ニニ ニー ニニ ニー ニー ニー ニー ニー ニーーー ニ ーーーーーーーーーーーー 


レ 計 
ツ 
部 || 02 | リー2 7ー24 | 2 2 
ー 25 一 26 
SM 0 一 06 ] 
] ト 
フ ツ 
03 
イ な 23 一 26 
ル 1| 06 | 49-56 01 一 04 ) ト 
に 1002 トラ ッ ク 04 
: 04 


Figure-2.2.70 当 例題 の 実行 で 書き 込ま れ た レコ ー ド の ディ スク 上 の アロ ケー ショ ン 
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例え ば , Figure-2.2.69 の ブロ ッ ク 04 は , PC-8001 CPM(1W) の ディ スク で は , トラ ッ ク 03 の セ 
クタ 01 一 08 に 当たっ て いる こと に な り ま す . し か し Figure-2.2.64 を 見 る と , プ ブロッ ク 04 の レコ ー ド 番号 
140 一 147 の 内 , 147 の み し か 書き 込み を 行っ て いま せん . よっ て , トラ ッ ク 03 の セク タ 08 の み に デ ー タ 

"05" が 書き 込ま れ て いる は ず で す . 
実 暫 プロ グラ ム を 実行 し た 後 、 実際 に デー タ が 書き 込ま れ た セク タ を ダン プ し て 次 に 示し ます . 


DISK=B TRAC に ド =Q2 GECTUR=1 7 ア 

BOO  QO _QQ QQ OO QO QO QQ QQ OO QQ oO QQ QQ OO QO oQ 
Bi1O OO QQO QQ OO OO OO QQ QQO OO OO Qoo OO oo oO Qoo QoQ 
Ba2QO  QO QO QOQ OO 0OQ QO Q2 QQ QQ OQ QO OO QQ QO QQ QQ 
Bk さ O OO 00 QQO _QO OOQ OO QGQ OO OO 0OO QO QQ QO OOQ QO QQ 
Ri4O OO OQ QO QO QOQ' OO QQO QQ QQ QQ QoO Qo oo OO Oo OQQ 
BsSO  QOQO OO QO OO 0O OO OOQ OO OO QO QO OO OO oO QO Qo 
Bi6O OO OO QOQ OO 0O OO QO OO QQO OO QoO Qoo Oo QQ oo oo 
Bk7O  QO OO OO OO OO OO QO OOQ OO oO oo oo Oo oo Oo OO 


DISK=B TRAC に ド =Q2 GECTOUR=18 

400 0O】 03 Q1 O1) O1 QOL 91 01 O1 01}1 O1 O1 O1 O1 O1 01 
お.10 の 1 0】 01 0}】 01 G1 01 O1 01 QO1 01 O1 01 Oi O1 O1 
Bs20  Q1 O1 OQ1 O1 O1 O1 O1 Q1 O1 Q1 O1 O1 O1 O1 O1 O1 
gaSO の O1 O}】 O ひ 1 O ひ 1】 O1 01 O】 01 O1 O1 O1 O1 O1 O1 O1 01 
Ba40 り 01 01 O1 O1 Q1 O1 O1 01 QO1 0O1 01 Oi1 O1 01 O1 O1 
5590 01 93 O】 01 の 1 0 O1 QO1 O1 O1 O1 01 O1 O1 01 01 
Bs6O  O1 Q1 O1 O1 O1 O1 Q1 O1 O1 O1 Q1 O1 O1 O1 O1 O1 
9 ょ 9 04 03 01 0】 の 6】 01 041 0) 01 01 0O1 0O1 O1 Oi Oi 01 


DISK=B TRAC に =O2 SECTUR=19 

BsOOQO QO2 QO2 0O2 02 O2 O2 02 Q2 Q2 Q2 o2 Qo2 O2 O2 O2 0Q2 
Bs1O OQO2 02 02 02 Q2 02 QO2 Q2 Oo2 QO2 Oo2 0O2 O2 Oo2 02 02 
Bk2O O2 Q2 02 02 02 Q2 02 Q2 Q2 Q2 02 O2 Q2 0O2 02 02 
BiSO  Q2 02 Q2 02 02 02 O2 Q2 Oo2 Q02 Q2 Q2 QO2 02 Q2 Q2 
Bi40 QO2 02 02 02 QO2 02 O2 02 02 02 02 02 Q2 02 02 02 
BaSO  O2 02 OQ2 02 Q2 02 O2 Oo2 Q2 Q2 QO2 O2 Q2 0O2 02 02 
460 02 の 2 02 02 02 02 02 02 02 02 02 02 02 02 02 02 
Bs7O0  O2 02 02 02 02 02 O2 O2 02 02 O2 02 02 02 02 02 


DISK=B TRACK=O2 SECTUR= さ Q 〇 

BaOO Oo4 QO4 QO4 Q4 Q4 O4 Q4 Q4 QO4 Q4 QO4 Q4 Q4 Q4 Q4 Oo4 
Bs1O Oo4 QO4 0Q4 0O4 Q4 Q4 0Q4 Q4 Q4 0Q4 04 04 Q4 0O4 0O4 Oo4 
Bs2O Q4 Q4 Q4 Q4 Q4 Q4 QO4 Q4 Q4 Q4 Q4 QO4 Q4 O4 Q4 04 。 。。。。 に 
BaSO OO4 Q4 Q4 QO4 0Q4 Q4 QO4 Q4 Q4 Q4 Q4 04 Q4 04 O4 04 0 に 。。 
Bs4O OOQO4 Q4 QO4 Q4 0O4 Q4 Q4 Q4 Q4 QO4 Q4 Q4 Q4 Q4 O4 Q4 
BsSO _Q4 Q4 0O4 QO4 QO4 QO4 QO4 Q4 Q4 Q4 Q4 0O4 QO4 QO4 Q4 O4 
Bsa6O _ Q4 QO4 Q4 QO4 Q4 QO4 Q4 Q4 0O4 Q4 Q42 Oo4 Q4 O4 O4 04 0 。。 に JJ 
Bs7O Q4 QO4 Q4 0O4 Q4 oO4 Q4 Q4 Q4 Q4 Q4 Q4 Q4 0O4 QO4 O4 。 。。。 に に に に 


DISK=B TRACK=O2 SECTUR= さ 1 

0 ひみ 09 0 うす 03 03 03 63 03 03 0 03 0 03 0 は OX 。、。、。。。。。。。。。。。 
4 の 0 03 03 03 03 08 03 03 03 03 03 OS 03 03 03 035 0C 。。、。。。。、。、。。)。。。 
9 2D り の 9 の 3 03 09 0 は の 093 Q は 3 03. 03 03 02 う 03 203 03 0 909 。。。。、。。。。。。。 。 
DL う 30 03 02 03 03 05 03 03 03 03 03 032 0Q3 05 03 0O3 0 ます 。。。。。。。。。。。 に 。。 < 。 
4 人 90 の う 03 ひ 03 03 0 う 3 の 0 さ OS 03 _ 03 03 0 さ 3 03 03 0Q3 93 @⑥ き  。。。。。。、。 < 
9540 03 03 03 003 09 03 03 93 03 03 03 03 903 03 63 03 。.、。、。。。。。。。。。。。 。 
RA GO 03 03 0 は 03 の 3 03 03 03 03 0Q3 Q03 0O3 05 0 は 3 03 903 。。。。。。。。。。。。。、 <。。 
470 903 03 03 03 03 03 03 03 0 03 03 03 03 03 03 9@93 。。。、。。。、。。。,。。。。.。・。 
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DISK=B TRACK=O さ SECTUR=QB 

BIOO QOS QOS Q5 OS Q5 Q5 o5 oS5 o5 o5 o5 o5 o5 o5 o5 o5 ニー ペン アク ンク 
Bki1O QOS OS5 Oo5 oO5 QG5 Oo5 o5 Q5 o5 o5 o5 o5 o5 o5 o5 6G5 3 パカ タク e aa を AA ae a 
Bi2O OS OS5 OS GS O5 Oo5 o5 oc5 o5 co5 o5 o5 o5 o5 o5 いっ 和 クージー ン ニン ジー 
Bki3O QOS O5O5 OS5QO5oO5 o5 o5 o5 o5 o5 o5 o5 o5 Oo5 っ 飲ん シン ンー ンー 
Bi4O0 QOS5 oO5 QOS QS Oo5 o5 o5 o5 o5 o5 os o5 o5 o5 9 9 、。。。。。 た とく >。 > > 。 < 
BkSO_ QOS Oo5 OS5 QOS oO5 oO5 oO5 o5 o5 o5 o5 o5 o5 o5 り 二 の 4。。。 ょ ん っ ムン ゃ 。4 ュ > > 
Ba6O QOS QOS O5Q5 QOS Q5 o5 o5 o5 Oo5 o5 oO5 o5 05 の 2 は け 8  A。、/。。/ < ん > ッッ トッ <。 
Bs7O OS QO5 OS5 Oo5 Oo5 o5 o5 o5 o5 o5 o5 o5 o5 oS に クッ マー ラーン ン 


DISK=B TRACK=O さ SECTUR=Q9 

BsQOO OO6 Q6 Q6 Q6 Q6 Qe6 06 Qe6 06 Qe Q6 Ge 06 Q6 06 い 。 生 科 シシ タン ツー ニー ンー ンー ー 
Ba1O Q6 Q6 06 Q6 06 Q6 Q6 Q6 06 Q6 0Q6 QG6 0Q6 06 生か と た 4 。 な ex 
RI2Q _ Q6 Q6 0Q6 Q6 Q6 Q6 0Q6 Q6 06 Q6 06 Q6 06 し て コー パタ ーー ー ゾ 
Bi3Q  QO6 Q6 Q6 Q6 Q6 Q6 06 O6 06 Q6 Q6 Q6 oO6 あま 、 り AM 00  。。。JZC/ > 
Bs4O 0Q6 Q6 Q6 0O6 06 06 06 Q6 06 6G6 06. 06 Q6 0 GO 0 2 
BkSO 0O6 Q6 QO6 06 0O6 Ce6 oe6 O6 oe6 oe6 Q6 oe6 oO6 o6 の 0 の 0 。 。/。。。 と と A<。 な < な メッ 。 
Bi6O _ O6 Oo6 Q6 Q6 06 O6 Q6 Q6 06 6 06 Q6 oO6 06 oO6 生生 タン ンー ウー ーー 
Bi7O 0O6 Q6 O6 0O6 06 oQ6 oO6 Oo6 oO6 Ce oo6 oe6 oO6 oO6 ん ツタ ンー レル ーー ンー 


DISK=B TRACK=Q さ SECTOUR=1 1 

EsOQ  Q7 07 Q7 07 Q フ 7 Q7 0O7 Q7 Q フ 7 O7 O7 0Q フ 7 O フ 7 0O フ 7 00 ンー ンプ イン クッ ンー ツン 
9410 07 07 07 07 07 07 07 07 07 07 0o7 07 o フ Q フ ァ 2 の 。 。。。 ム と くく <。 。 。 > 。 
Bs2O OZ7 Q7 07 07 07 0 フ 7 O フ 7 0 フ 7 O フ 7 Q フ 7 0O フ 7 0O フ 7 07 07 Q フ 2 の 。 と awewweae2kkeea 
Ba さ 3O OZ 07 07 07 07 O7 O7 0 フ 7 O7 oO フ 7 07 フ 7 0O フ 7 0 フ 7 0 フ 7 0 フ 7 グイ 0 ペル ルン ルレ ンー ンー 
は 』40 0 0 プ Z 07 07 07 Q7 07 Oo7 07 07 07 O ア Q フ 07 0 アァ ンク 4 緒 て ー マ ー タ クツ セッ ンー ンー 
8450 OZ 07 07 O7 07 0QO7 07 07 0O7 0O フ 7 07 07 O7 967 O フ 7 0 フ 7 区 導入 タツ ルッ クック 
Bs6O OZ OZ 0O7 OZ O7 0O フ 7 O7 Q フ 7 Q フ 7 O フ 7 0O7 0O フ 7 O フ 7 O フ O フ 7 0 フ 7 の woegeaaww な を ゃ を ゃ aa 
Bk7O 0O7 Oo7 OZ7 07 07 07 07 07 07 07 Q フ 7 07 O フ 7 0 フ oO フ 7 07 wo ee ee paeeeenoae 


DISK=B TRACK=Q さ BECTUR=24 

RsOO  O8 QB OB OB OB OB QB og QB Og og og og og og og ん 守 六 ま の コタ イー マ セク クー 
Bk1O OB OB OB O8 OB OB QB OB Oo8 QB og o8 o8 og og og 人 肖 二 0 R ジーン ツマ ッ ラ ャ 
RiZO QB OB OB OB 08 OB QB og O8 OB og og oO8 og og og oe eee eeeseepoeaoe 
Bi う O CB OB QB QB QB QB QB OB OB OB og og og og og og aa awa enp eeswa eee 
Ei40 OB OB QB QB QB OB Q8 QB O8 QB og Q8 OB Q8 og Qg dopa seoeeeeeeaeoez 
BiSO OB OB OB QB OB OB OB QB OB Og Qg og og og og og し ます 人 ま まん 
Bi6O OB8 OB OB QB QB OB8 QB QB Qg Qg og og og Qg og 人 スス タン ツア ル リン ツーン ンク 
Bs7O OB QB QB O8 OB QB Oo OB og ra og oO8 og QB 生計 2 ネー ツー ロア ルン ンク フン レシ 


DISK=E TRACK=O さ SECTUR= さ Q 

RiOO _ QA QA QA QA OA QA QA QA QA OA QA QA OA QA Oa OoA seooose aa es ee 
Bi1O _OA OA QA QOQ QA OQ QA OQ oOQ QA QAa Oa Ooa oOa QAa スン ャ ルク ツンツン 
Bs<O _ QA QA QA _QOaQ QA QA QA QA Oa Qa QAa QA QA _OA QA QA ooseseoecoe 
BkSO _ QA OA QA QA Qa QA QA QQ oOaQ Oa oOa oO _Oa _Oa OoA 2 まく ペタ イン ツン と 
Ba4O _ OA OA QA OQ QA QA QA _ OaQ OQaQ QA QA Oa QA _OA QA QA es meeeesesoeeeee 
BsSO _ QA QA QA OQ OaA QA QA OQ OQ QOaQ oOa Ooa_Oa oOa oa QA 乱入 る ん クン クッ ンー 
Ba6Q_ QA OaA QA OaA QA QA OaA Oa り A OR OO 9A の 9A OA OA 。 。。。。。。。。。。。。。。。。 
Bi70 QOaA OA QA OA QA QOa OaA Oa QA Oa Oa Oa Ooa Ooa Ooa り 生 いま を タマ ヤー ツァン クンツ ソン 


DISK=B TRACE=Q く BECTUR=32 

BsOO_ QO9 09 09 09 Q9 C9 og og og o9 og og og og og o9 0 放 き る る ツ ジ ピ ッ ン ー 
Bi1O 0QO9 09 09 09 Oo9 0O9 09 o9 og Oo9 o9 o9 o ゥ 9 og og og9 0 の な ep な Anne e 
BiZO QO9 09 QO9 09 09 og Oo9 og og9 og9 og og o9 og og o9 ce mn oeaeaessaeece 
BsiSO 0Q9 09 09 O9 O9 09 o9 o9 oO9 09 o9 og o9 og o9 og と と wpym onaw ae wa moe 
Bs40_ 0909 09 09 09 og9 og og og og og cg og og og oco9 weeeoeos apeaesoe 
BsiSO _ QO9 Q9 09 09 09 oO9 o9 oO9 o9 o9 og o9 oO9 oO oO9 4 フーン ヤー ンー ーー デー 
BI60 _ 09 09 09 Q9 09 o9 og9 og Oo9 og og og o9 og og og ww se eeewmeewreseoe 
Bsh7O_ QO9 0O9 09 O9 QO9 Cg og og og9 og Oo9 og o9 og og og ae ne menpeee oe eee 
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Figure-2.2.71 実習 プロ グラ ム の 実行 に より , 書き 込み が 行わ れ た セク タ の ダン プ . 


@ Figure-2.2.64 の レコ ー ド 番号 と , 書き 込む データ の リス ト . 

e Figure-2.2.68, Figure-2.2.69 の 作成 され た ファ イル の ディ レク トリ の ダン プ ・ リ スト . 
@ Fipure-2.2.70 の ブロ ッ ク 番 号 に 対す る ディ スク 上 の セク タ 表 . 

e Figure-2.2.71 の 実際 に 書き 込み が 行わ れ た セク タ の ダン プ ・ リ スト . 


これ ら の 資料 を 関連 付け て 見 る こと に より , ラン ダム ・ ア クセ ス の 機能 が 理解 で きる も の と 思い ま 

す . 
誤解 し や すい も の の 1 つ に 1 レコ ー ド 番号 と ,。 ディ スク 上 の アロ ケー ショ ン の 関係 が あり ます . 

1 つの ファ イル 内 で は ,。 各 レ コー ド 番 号 は , ディ スク 上 の 該当 する セク タ と 1 対 1 に 対応 し ます が , 
別 の ファ イル で は , 先程 の ファ イル と 同じ レコ ー ド 番号 で も , 全く 別 の セク タ に 当たり ます . つま り , 
レコ ー ド 番号 は , ディ スク 上 の 絶対 的 な 位置 を 示す も の で は な く , それ ぞ れ と ファ イル 内 で の 相対 的 
な 位置 を 示す も の で ある と 理解 し て 下さ い . 

この 意味 の 理解 を 助け る た め に , 実習 プロ グラ ム 34 .COM” を , 先程 の ディ スク 上 に 前 回 と 同じ 
レコ ー ド 番号 表 に より , 続け て も う 一 度 実 行 し た 場合 (今度 の ファ イル 名 は “2ND . RND” と し た ) 
の ディ レク トリ 部 を ダン プ し て 示し ます . 全く 同じ ラン ダム ・ レ コー ド 番 号 に 書き 込み を 行っ た 2 つ 
の ファ イル と いう 点 に 注目 し て 下さ い 、 


136 
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DISE=B TRACK=Q2 SECTUR=Q 1 
Bs OO ら さ 54 20 20 2O0 TEST RND 。 。 。 1 


Bs10 Q② の oo oo oo Q の Qg) oo 0 oo ーー の つ 


Bi 20 ら 人 4 S さ 54 20 20 TEST 


Bi さ O QO QO oo DO 00 GO _ 00 90 00 0D 00 。、。,..-、. 

Bi 4O 54 SS 54 20 -TEST RND.。.H 
Bi 5O oo oo oo oo oo ーー テー 
Bi 6Q SS S4 20 。TEST JNNMD...、 


54 45 
Bi7O Oo oo(Q⑥ の 〈⑥5S)oo oo ーー 


DISK=B TRACK=Q2 SECTUR=QO2 
BsOO OQO 54 45 5 ミ 20 20 20 
Bs1O  QO QO QO 0Q OO_OO_QOO 


B』 さ O LE ERR EEE MR RI RE IE NR RE NR 


Bi 4O 「 4 1c “ RND. . . " 
Bi SO 


Rs20  QO 32 4E 44 2Q0 20 20 2Q 2 4E | [ ・ 2ND _。 て 


RND 。 <H 


DISK=B TRACK=O2 SECTDR=O ミ 
BOO Oo さ 2 4E 44 2Q 2Q O 52 4E 44|O 四 .2ND RND . .  . 
Bi 1O 0 GO 0G OO OH 。。。。、、。 Le 
Ri20 OO さ 2 4E 44 20 2Q ) 呈 44 ol[ oo ool2g| .2Np RND. 。 . ( 
Bs3Q |ooO QO oO oo QF) oo_ 0 0 00 00 000 、、。。。。、。-。、。。。。。 
Bi40 E5 E5 ES ES ES E5 ' E5 E5 ES E5 E5 
Bk5O E5 E5 E5 ES E5 E5 上 E5 E5 E5 E5 E5 E5 
Bi6Q E5 E5 E5 E5 ES ES E5 E5 E5 E5 E5 
B:7O ES5 ES E5 E5 E5 E5 」 E5 E5 E5 E5 E5 


EE ER NE RE ER ME HE ME NE BE MR RE 
人 


Figure-2.2.72 全く 同じ ラン ダム ・ レ コー ド 番 号 表 に より , ファ イル 名 の 異な る 2 つの ファ イル を 作る . 


前 回 の “TEST . RND” に 続い て , 同じ よう に ディ レク トリ が 作ら れ ま し た . し か し , アロ ケー シ 
ョ ン ・ マ ッ プ の それ ぞ れ の ブロ ッ ク 番 号 だ けが 異な っ て お り , 同じ レコ ー ド 番号 を 使っ て も 書き 込み 
が 行わ れ た 物理 的 な ディ スク 上 の 位置 が 異な っ て いる こと が 分 か り ま す . 

で は 次 に , ラン ダム な 13 の レコ ー ド で 作ら れ た 2 つの ファ イル 、 “TEST RNI と は 2ND RND* 
の 内 容 (ラン ダム ・ レ コー ド の 取り 出し 順に , それ ぞ れ の セク タ が , 128 バ イト の 00, 01, 02。…… 
00 で フィ ル さ れ て いる ) と , それ ら の デー タ が 書き 込ま れ た ディ スク 上 の 物理 的 な 位置 の 関係 を 示し 
朱 二 。 

デー タ が 書き 込ま れ た セク タ の 位置 は , Figure-2.2.72 と , Figure-2.2.70 か ら も 求め る こと が で き 
ます が , ここ で は , フォ ー マ ッ ト し た 直後 の 完全 に 空 の ディ スケ ッ ト と の , ト ラック to トラ ッ ク の グ の 実 比 
較 に よっ て 調べ て み ま す 。. 先程 の シン クウ ェ ア ・ ラ ブ ズ 社 の セク タ ・ デ ィ ス プレ イ と 同じ パッ ケー ジ 
に 含ま れ て いる , コン ペア ・ デ ィ ス ク の プロ グラ ム を 使っ て いま す . 

フン ダグ ダム ・ ア クセ ス に より 書き 込ま れ た 2 つの ファ イル が 占め る セク タ は , “COMPARE ERROR? 
と な っ て , すべ て 表示 され て いま す . それ ら の セク タ に 何 が 書き 込ま れ て いた か を , その 右 に 示し ま 
し お 。 
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QA>CMPD ISK ) 


DISK COMPARE PROGRAN 。 V1.5 
FDR PC-BOO1 CP/M 


COpyF1qght by  -SYNCMARE LAESー 


1 n ロ Du 上 5 上 モ a レ 上 上 上 ヒ a ヒ CK 栓 OOー さ 4 >02 
1 nDut star 人 に た 上 Or 拉 O1- さ 2 >17 
CDMPARE ERRODR UN TRACK= O2 SECTOR= 17 OO 
COMPARE ERROR ODN TRACK= O2 SECTOR= 1 コー-O1 
CDMPARE ERRDR UN TRACK= 0O2 SECTOR= 19 02 
COMPARE ERRIR UN TRACK= 02 SECTDR= さ Q 一 --04 
COMPARE ERRUR UN TRACK= O2 SECTOR= さ 1 ---03 
COMPARE ERRDR UN TRACK= Q さ SECTOR= QB 0O5 | 
COMPARE ERRDR UN TRACK= O さ BECTOR= O9 0O6 ここ SI 
COMFIARE ERRDR UN TRACK= Q さ SECTOR= 11 07 
COMPARE ERRDR DN TRACK= 0O さ SECTOR= 24 08 
COMPARE ERROR UN TRACK= OS SECTOR= さ O 0OA 
COMPARE ERROR UN TRACK= OQ さ SECTOR= 32 ---09 
COMPARE ERRDR UN TRACK= O4 SECTOR= Oo1 OB 
COMPARE ERRDR UN TRACK= O4 SECTDR= 12--0C 
COMPARE ERRODR UN TRACK= O4 SECTOR= 17--OO 
CDMPARE ERRDR DUN TRACK= O4 SECTOR= 18---01 
COMPARE ERRDR UN TRACK= QO4 SECETOR= 19 02 
COMPARE ERRDR UN TRACK= O4 SECTDR= OO0O4 
COMFARE ERRODR DN TRACK= O4 SECTOR= 1 03 
COMPARE ERRUDR UN TRACK= O5 SECTOR= QB--O5 
COMPARE ERRUR UN TRACK= QOS SECTOR= 09 一 --O6 2 
COMPARE ERRDR DN TRACK= QO5 SECTOR= 11 一 -07 
COMPARE ERRUR UN TRACK= OS SECTOR= 24 0O8 
COMPARE ERRDR UN TRACK= OS SECTOR= 3Q -ー-OA 
COMPARE ERROR DN TRACK= O5 SECTOUR= 32 ----09 
COMPARE ERRODR UN TRACK= O6 SECTOR= Oo1 OB 
COMPARE ERROR ON TRACK= 06 BECTOR= 12--OC 
4 
ty1 END ロ F LABT TRAC +++ ャ ++ 0 


CONPQARE ERRUR EXIST 


PIGEON ご 4 用 LLS SU AELIEEE 才 2 


き 込 まね て いる デー タダ 


同一 ラン ダム ・ レ コー ド 番 号 で 2 つの ファ イル を 作成 し た 場合 の , 書き 込ま れ た 内 容 と 
ディ スク 上 の 実 セ クタ の 関係 . 


Figure-2.2.73 


ラン ダム ・ ア クセ ス の 基本 的 な 機能 は 。 ファ ンク ショ ン : 33, 34, 36, 40 の 実習 プロ グラ ム で 解説 
され て いま す が , 要する に , 「 レ コー ド の ラン ダム な 読み 書き が で きる 」 と いう 一 言 に 尽き ます . し か 
し 我々 CP ン M ユ ュー ザー に と っ て , 間 題 は その 後 の こ と で あり , これ ら の 機能 を いか に 有効 に 応用 する 
De と を で しょう 。 

漢字 ワー ド ・ プ ロ セ ッ サ な ら 「 辞 書 」 の 検索 に 応用 で きる で し ょ う . 「 辞 書 」 の “早見 表 " を シー ケ 
ン シ ャ ル ・ フ ァイル で 作り , “早見 表 ” で 目標 を 一 応 見 つけ て か ら , 「 辞 書 」 に ラン ダム ・ ア クセ ス さ 
せる か , ある い は も っ と 効率 の 良い テク ニッ ク を 合う の か ……. 


138 


シス テム ・ コ ー ル 徹底 実 泊 


フン ダム ・ フ ァイル の 応用 に は , 様々 の テク ニッ ク が ある で し ょ う . そこ は 各自 で 試み て 頂き た い 
と 思い ます . 


CALL 手 順 
MVI oe ( 三 23H) 
(D, E) で FCB ア ドレ ス 
CALL 0005H 
事 
(FCB の r0。r1, r2 に ファ イル ・ サ イズ が セッ ト さ れる ) 


機能 [ 

(D, E) レ ジス タ で アド レス され る FCB で 示さ れる ファ イル の , エン ド ・ オ プ ・ フ ァイル の 次 の レコ ー 
ド 番号 を , FCB の r0,r1 フ ィ ー ル ド に セッ ト す る . LSB は r0 に , MSB は r1 に セッ ト され る . ファ イル 
が 最大 の レコ ー ド 数 で ある 65536 を 持っ て いる 場合 は ,。 フィ ー ル ド r2 に 01 が セッ ト され る . この 機能 に 
より , ファ イル の 大 きき さ ( 総 レ コー ド 数 ) を 知る こと が で きる . 

FCB の フィ ー ル ド r0, r1 に セッ ト さ れ た 値 は .。 シー ケン シャ ル ・ フ ァイル の 場合 は 。 実際 の ファ イル 
の サイ ズ と 一 致す る が , ラン ダム ・ フ ァイル の 場合 は , ファ ンク ショ ン : 35 の 実習 で も 経験 し た よう 
に 中 ぬけ ” が 存在 する た め に , 実際 に 書き 込み が 行わ れ て いる レコ ー ド 数 より ,。 ずっ と 多い 見 か け 
上 の ファ イル ・ サ イズ と な る 。. 

も う 1 つ の 機能 (機能 と 言う より , 上 記 機 能 に 他 な ら な い が ) は , 当 フ ァ ン クシ ョ ン を 実行 する こと 
に より , ファ イル の 最終 レコ ー ド の 湊 が FCB の r0, r1 に セッ ト さ れる こと を 利用 し て ,。 続け て ファ ン 
クシ ョ ン : 34 を 実行 する こと に より , その レコ ー ド 位置 に ラン ダム な 書き 込み を 行う こと が で きる . 
この 機能 の 様々 な 応用 が 考え られ る . 


実習 プロ グラ ム ファ ンク ショ ン : 35 


当 フ ァ ン クシ ョ ン を 実行 し た 後 の FCB の r0, r1, r2 の 各 フ ィ ー ル ド を , た だ 表示 する だ け の プロ 


グラ ム を 作り , 当 機 能 を 確認 する . 
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全 シ ステ ハム ・ コ ー ル 徹 展 解説 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 湊 に 示し ます . 


OQO1QO _OE2 さ 
O102 115SCQOO 
Q1QS CDOSOO 


O1O さ A7DOO 
O1OB CD1BO1 
O1OE 37EOQO 
Of3 CD1BO1 


O114 37FOO 
CD1BO1 


Figure-2.2.74 


1 40 


nn>TYPE 3BS.FRN 」 


FCB 


STARTi 


DATAOUTs 


うら 5 COUMPUTE FILE SIZE 3 


1OOH 
QQSCH FCB ア ドレ ス は デフ ォ ー ル ト の 5CH に 設定 . 


し 。 うり | 
D。FCB ファ イル ・ サ イズ の 計算 ?* の シス テム ・ コ ー ル 
OoQOSH 


FCB+3 さ 
DATAOUT 
FCB+ く 4 
DATAOUT 


FCB の r0, r1, r2 フ ィ ー ル ド の 順に , その 倫 を 
コン ソー ル に 表示 する . 


FCB+3③ ら 5 
DATAOUT 


RET - プロ グラ ム を 終了 し て , CP/M に 戻る ・ 


HE XDSFPLYs 


HOUUT1: 


HOUUT2s 


COUNOUT 


PUSH 


PSM | 
A。" * 
CONQOUT | 
FSM 
HE XDSPLY 


コン ソー ル に 16 進 で 表示 する サブ ルー チン . 


P ら ゆり 


RRC! RRC! RRC 


HOUT 1 


| A レ ジス タ の 値 を , 16 進 で コン ソー ル に 
on | 表示 する サブ ルー チン 


COUNOUT 


りく | A レ ジス タ の アス キー ・ キャ ラフ タ を, コン ソ 
* 1 AA ーー ン 。 
| ル に 出力 する サブ プ ) ンー 


ファ ンク ショ ン :35 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


シス テム ・ コ ー ル 徹底 実習 
上 記 ソ ー ス ・ リ スト か ら ア セン ブリ ・ ソ ー ス ・ フ ァイル を 人 作り, アセ ン ブ ル し 。\35 . COM^ を 生成 
し て 実行 し て み ま し ょ う . 
ファ ンク ショ ン :35 実習 プロ グラ ム の 実行 
実行 する た め の コ マン ド 形 式 を 次 に 示し ます . 


35_」X : filename . ext J…… ドラ イブ XX : 上 の ファ イル “ 則 ename 。 ext′ の ファ イル ・ サ イ 
ズ を 示す ECB の r0, r1, r2 の 値 を 表示 する . 


実行 例 と し て 。 シー ケン シャ ル ・ フ ァイル の 「PIP . COM” と 。 フ ファンクション : 34 の 実習 で 作成 
し た ラン ダム ・ フ ァイル “TEST . RND” に 対し て 実行 し た も の を 次 に 示し ます . 


4 SA 
| AzSTAT_PIP。C ロ M ) ファ イル ^PIP. COM* の 状態 を 調べ て お ぐ . 
ReC5 Bytes Ext Acc 


- SB Bk 1 R/M AzPIP。COM Recs の 順 の 値 "58"(HEX で は 3A) に 注目 . 
Bytes Remaining ロロ n ai 125k 


QA> さ 5 PIP.COM / ファ イル *PIP. COM" に 対し て , 実 習 プロ グラ ム の 実行 . 
さく A OO OO ファ イル ・ サ イズ は 003ACHEX) と 表示 され だ . 


| トー トー4 STAT コ マン ド で の 値 と 一 致す る . 
人 PP Z 


人 >STAT BsTEST。RND) ラン ダム ・ フ ァイル "TEST. RND“" の 状態 を 調べ て お ぐ . 
ReC5 By 上 tes Ext AcCc 


227 Bk  R/M BzTEST、RND FRecs の 寺 の 値 "22/"(HEX で は 021B) に 注目 . 
Bytes Remaining Un Bs 2 さく う k 


> さら BsTEST.RND / ファ イル "TEST. RND" に 対し て , 実習 プロ グラ ム の 実行 . 


1B O2 OO ノア イル ・ サ イズ は 021B(HEX) と 表示 され だ . STAT コ マン ド で の 値 と 一 致す る . 


人 Q> 


に NT の リウ" の の い 0。{。{† ゎ 。 ろ 、=、 = ン 


Figure-2.2.75 ファ ンク ショ ン :35 実習 プロ グラ ム の 実行 例 . 
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至 シ ステ ム ・ コ ー ル 徹底 衣 説 


CALL 手 順 
M VI に 30m… の で ( 三 24 是 ) 
(D, E) FCB ア ドレ ス 
CALL 0005H 
吾 
(FCB の r0,r1, r2 に , ラン ダム ・ レ コー ド No を セッ ト す る ) 


機能 

ファ イル を シー ケン シャ ル に リー ドブ プラ イト し て , 任意 の 位置 で 当 フ ァ ン クシ ョ ン を 実行 する と , シ 
ー ケ ン シ ャ ル に リー ドブ プラ イト し た 最後 の レコ ー ド 十 1 の レコ ー ド No を FCB の r0,r1,r2 フ ィ ー ル ド に 
セッ ト し , その レコ ー ド か ら の ラン ダム な リー ドグラ イト を 可能 に する . 


ーー 一 mem シー ケン シャ ル に リー ドラ イト 


レコ ー ド ク 
N0. 」 
0 2 n 十 ln 十 2In 十 3 n 十 5 …・ 


レコ ー ド No.(n 十 3 ) が リー ドブ プラ イト され 
た 直後 に 当 フ ァ ン クシ ョ ン が 実行 され た 場合 , 
次 の レコ ー ド No.(n 十 4 ) が FCB の r0, rl に 
セッ ト さ れる . この まま ラン ダム な リー ドン 
ライ ト を 行う と , この (n 十 4 ) の レコ ー ド が , 
リー ド プ ライ ト さ れる こと に な る . 


(ある シー ケン シャ ル ・ フ ァイル ) 


実習 プロ グラ ム ファ ンク ショ ン : 36 


当 フ ァ ン クシ ョ ン を 基 に し た ラン ダム ・ ア クセ ス に よる 検索 プロ グラ ム の 作成 例 が , 次 の 2. 3 章 に 
あり ます . その 検索 プロ グラ ム で は , シー ケン シャ ル に リー ドブ プラ イト きれ る 部 分 が , 各 イ ン デ ッ ク 
ス に 対応 し た ラン ダム ・ レ コー ド No を 格納 する マッ プ 部 と な っ て いま す 。 ただし, ここ で の プロ グラ 
ム で は マッ プ 部 は , わずか 1 レコ ー ド で す . 1 レコ ー ド で す が , この マッ プ 部 を 実習 の た め に 一 応 シ 
ー タ ケン シャ ルル だ リー ドン / ダ イト を 行っ て そい ます 、 

当 フ ァ ン クシ ョ ン を 含め て ,。 ラン ダム ・ ア クセ ス の 応用 例 と し て 。 2. 3 曹 の 「 ラ ンダ ム ・ ア クウ クセス 
に よる 検索 アロ グラ ム の 作成 」 を 参照 し て 下さ い . 


1 4 


シス テム ・ コ ー ル 徹 克 実習 


ファ ンク ショ ン : 37… デ ィ ス ク ・ ド ライ ブ の リセ ッ ト 


CALL 手 順 

MVI に 、 あか * の ( 王 25H) 

(D BB 一 ドラ イブ ィ ベ クト ル 

CALL 0005H 

意 

((D,E) レジ スタ の 16 ビ ッ ト の ベク トル で 示さ れる ドラ イブ が リセ ッ ト さ れる ) 
機能 
(D, E) レジ スタ に セッ ト す る 16 ビ ッ ト の ベク トル に 従っ て ,。 ディ スク ・ ド ライ ブ の A : 一 P : の 任意 
の も の を リセ ッ ト 状 態 に する . 
例え ば , 16 ビ ッ ト の ベク トル が 次 の よう で あれ ば , 


D レ ジス タ 


bit 7 bit 0 bit 7 bit 0 


上 記 ベ クト ル に より , ドラ イブ B : と D : が リセ ッ ト さ れる . 
ディ スク ・ ド ライ ブ は , リセ ッ ト に より オン ライ ン 状 態 を 解 か れ , ドラ イブ が R ノ 0 に セッ ト き され て い 
る 場合 は ,。 RW に リセ ッ ト さ れる . 


実習 プロ グラ ム ファ ンク ショ ン : 37 


当 フ ァ ン クシ ョ ン は 。, 一 度 に 複数 の ドラ イブ を リセ ッ ト で きる が , ここ で は 実習 プロ グラ ム を 
簡単 に する た め , A : 一 D : の 4 つの ドラ イブ の 内 , 任意 の 1 つの ドラ イブ を リセ ッ ト す る プ 


ログ ラム を 作成 する . 


プロ グラ ム を 実行 する と , リセ ッ ト し た い ド ライ ブ 名 を 問い 合わ せ て きま す の で , A 一 D の 任意 の 
ドラ イブ 名 を キー イン する と , その ドラ イブ が リセ ッ ト さ れ ま す . 
この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 
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王 シ ステ ハム ・ コ ー ル 徹底 解説 


、 ハ 


A>TYFPE さ 7.PRN / 


010O 


O10O 
O102 
Q0105 


O108 
O10A 


Q1OD 
O1QOF 
O112 


O115 
O117 
O1 1 人 


O11D 
O11F 
0122 


0125 
0127 
012A 
O12D 
01 2F 
O1 さ 1 
O1 さ 4 
O1 さ 3Z 
O1 3 


01 3 に じ 


O1 さ D 


QEO 
1 1 さ DO1 
CDOSQOQ 


OEO1 
CDOSQOO 


FE41 
1101Q0Q 
CA さ 701 


FE42 
110200 
CA さ 7O1 


FE4 さ 
11040O 
CA さ 7O1 


FE44 
1 1QBQO 
CA さ 7O1 
QEO2 
1E さ F 
CDOS5oo 
C さ QBO1 
OE25 
CDoOSQQ 


9 


ODQOA494ESO MSGKINs DB 


Figure-2.2.76 


孔 % で 


デン ダシ ル ョ ッッ 


スト りえ スト か な ませる 人 


きき ーー ーー ーーーーーー ーーーー ーー ーーーーーー ーーーーーーーーーー ーー ーー ーー ーー ーー ーー ーー ーー ーーーー ーー ーー ーー ーー ーー ーー ーー ーー ーー ーー ーー ーー ーー ーー ー ツ ーー ーーーー ーーーーーーーー ーー 


う 7』。 RESET VRIVE (Vector ) 


RG 10OH 
START: 
MV 1 C。9 | ー ーー 
LX 1 D。MSGKIN [ に イン を 促す メッツ セー ジ を 
CALL QQQ5H 
KINERR: 
MV 1 も 1 、 ー 
の 00 | ' コン ソー ル 入 力 の シス テム ・ コ ー ル 
CF 1 し | _ ーー 
「 キー 入力 が ^A" な ら , DE レジ ス ダ に 3 
LX 1 D。QQQO ま WOQQO1B ご と うそ 
9 ペッ 。 
]7 RESET | 01 を セツ ト し て ^RESE 0 ノー ズ 
C じ Pi を 1< 語 WW り /』 
ー 入 力 が ^B" な ら , DE レジ スタ に 
りう た DORA EE *RESET* へ ジャ ンプ . 
JZ . RESET 
CF ーー w ハン ーー こぶ 2 
| キー 入力 が ^C* な ら 5, DE レジ スタ に 
pe ッッ 
JZ RESET 
CF1 >D* | ーー _。 
キー 入力 が ^D* な ら , DE レジ スタ に 
J2 RESET 06 を ピン ヒレ 
MV 1 に つう ] 
MVI E。* マ "| キー 入力 ザ AーD 以 外 の 場合 は , い ゃ / を 
CALL OOO5H | 出力 し て , 再び キー 入力 に 帰る . 
JMP KINERR . 
RESET: 
MV1 じ 。 さ 7 | "ディ スク ・ ド ライ ブ の リセ ッ ト “の シス テム コー ル . 
(3LX1 D。Vmctor ) : ご ここ に 来る 以前 に , DE レジ スタ の ベク トル は セツ 
CALL ooosH | に され て いる . 


RET -- プ ログ ラム を 終了 し て CPM に 戻る . 


END 


・37 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


ソー ス ・ フ ァイル を 作り , アセ ン ブ ル レ し , 


し て 実行 し て み ま し ょ う . 


ODH, ORH。 "INPUT DRIVE NAMNE TO BE RESET 


ルス 0 


*37 . COM” を 生成 


シス テム ・ コ ー ル 徹底 実習 


ファ ンク ショ ン : 37 実習 プロ グラ ム の 実行 
当 プ ログ ラム の 実行 は 。 まず 。 
37 


と キー イン し , ドラ イブ 名 を 問い 合わ せる メッ セー ジ に 従っ て , AD まで (本 来 は AP の 16 ド ドラ 
イブ を 任意 に リセ ッ ト 可能 で ある が , 当 プ ログ ラム で は AD の 4 つの ドラ イブ に 制限 し て ある ) の 
ドラ テイ イプ 名 人 を キー イン する こと に より 行わ お ます . 

実行 例 を 次 に 示し ます . 


どー 


ヽ 
N 
の * ヽ 


2GTAT smR/U リナ に ライ ブ ム を R O に セツ トド ト 。 ] 


A>2STAT Bs=R/0D/ ドラ イブ B : も R/O に セッ ツ ト . 


>STAT / - そ の 確認. 
1 RG SMAemi 189k | 。 ここ JO 
| 生 M 貞 Z0。 MEWI 2224 |) ーーー 


A> さ 7 / - 実習 プロ グラ ム の 実行 . 


INPUT DRIVE NAME TO BE RESET >A に ドウ イブ A : を リセ ツ ト . 


QA>STAT / 結果 の 確認 . 

Bs R/ 有 。 Spacei 2 ささ に ドラ フラ イブ A: が ガリ セツ ト され だ 直後 の STAT コ マン ド の 実行 な 
の で , ドラ イブ A : の レポ ー ト が 行わ ね て いな い . B : は 元 の 
まま の R/O で ある . 


仙 >37 / --- 有 再度 , 実習 プロ グラム の 実行. 


INPUT DRIVE NAME TO BE RESET >B 今度 は ドラ イブ B : を リセ ツ ト . 


| >STAT/ 結果 の 確認 . 
| 仙 : 民 /M。 Spaces 12Bk ドラ イブ B : は リセ ツ ト さ れ て , OFF LINE 状 態 で ある の で 。 
レボ ポー に され て いな い . 当然 R/WC リ セッ ト さ れ て いる . 先 
| > 粗 の A: の リセ ッ ト 実 行 で , A : ガ RAWC に リセ ツ ト さ れ て いる . 
N / 
N ーー 


Figure-2.2.77 ファ ンク ショ ン :37 実習 プロ グラ ム の 実行 例 . 


1 4 ら 


主 シ ステ ハム ・ コ ー ル 徹底 解説 


ファ ンク ショ ン : 40… ゼ ロ 書 き 込 み ( ゼ ロ ・ フ ィ ル ) を 伴う ラン ダム な 書き 込み 


CALL 手 順 
MVI に 朱 た ce ( 三 28H) 
(D, E) で ECB ア ドレ ス 
CALL 0005H 
還 
(書き 込み が 正常 に 行わ れ た 場合 は A レ ジス タ に 00 が , 正常 で な い 場 合 は 01 一 06 の エラ ー・ 
コー ド が 格納 され る ) 
機能 
ファ ンク ショ ン : 34 の 「 ラ ンダ ム な 書き 込み 」 と 同じ で ある が , 当 フ ァ ン クシ ョ ン は , デー タダ が 実際 
に は 書き 込ま れ な い “ホール " (中 ぬけ ) と な る レコ ー ド も 含め て , 書き 込み の 対象 と な る ブロ ッ ク の 
すべ て を 事前 に 00 で うめ て お き , その 上 で デー タ の 書き 込み を 行う 一 一 と いう 機能 が 追加 され て いる . 


実習 プロ グラ ム ファ ンク ショ ン : 40 


アア ジン タン ション ・ 拓 の 朱 才 アプ ログラム Figue-2.2.5) の 。 ブ ラブ ァ ン クシ ョ ン 34 の シス テム < コ ユー 
ル の 都 劉 を 。 ファン クシ ョ ン | 40 に 変え た だ け で ,、 そっ くり 揚 に し も の で す .。 均 細 は ファ ンタ 立 ョ シ ・ 
34 の 項 を 参照 下さ い . 

この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


QA>TYPE 4Q.PRN 』/ 


ファ ンク ショ ン : 34 と 同一 プ ログ ラム 、 し 部 が 異な る の み . 
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Q。M 
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QOO5H 
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ERROUR 
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7/ 


ー プ 


ステ ム ・ コ ー ル 徹底 実習 


1 オノ 


全 シ ステ ム ・ コ ー ル 徹底 解説 


Q174 BETQADRi DS の 
Q176 MTPATTNi DS 1 
Q177 END 
仙 > 
/ 
Ni 〆 
0 2023233882252 ン 


F 姓 ME@e2.2.78 。 ファ ンク ショ ン ・:40 実 彰 プロ グラ ム の PRN 形 式 の ソー スズ 5 疲 スキ 、 
上 記 ソ ー ス ・ リ スト か ら ア セン ブリ ・ ソ ー ス ・ フ ァイル を 作り , アセ ン ブ ル し , “40 . COM” を 生成 
に ES 語れ G 9 レン よ サッ 。 
ファ ンク ショ ン :40 実習 プロ グラ ム の 実行 


当 プ ログ ラム の 実行 方 法 と 実行 結果 は , ファ ンク ショ ン : 34 と 同じ で す . た だ し , 実際 の ガー クタ が 


書き 込ま れ て いる レコ ー ド 以外 の ブロック に は , すべ て に 00 が 書き 込ま れ て いる は ず で す . 
実行 例 を 次 に 示し ます . ' 


A>DDT RND.HEX / ラン ダム ・ レ コー ド 番 号 表 を アド レス 4000H か ら ロ リロード. 
DDT VERS <. 

NEXT FC 

4Q1C OOQOQO 

ー こ に  CP/M に 戻る . 


A>4O BTEST4O。RND / ドラ イブ B 上 に , ラン ダム ・ フ ァイル "TEST40 .RND" を 作る . 


仙 > 
Figure-2.2.79 ファ ンク ショ ン :40 実習 プロ グラ ム の 実行 . 


実行 が 終わ り 。 ラ ンダ ム ・ フ ァイル “TEST40 . RND” が 作ら れ ま し た . デー タ が 書き 込ま れ て い 
な い 部 分 に , 00 が 書か れ て いる か どう か 確認 し て み ま し ょ う ). 

ファ ンク ショ ン : 34 の 項 の Figure-2.2.72 を 参照 し て 下さ い . この 表 の “TEST . RND" の 部 分 が , 
今回 の “TEST40 . RND” の 部 分 で す . この トラ ッ ク 02 の セク タ 17 か ら , トラ ッ ク 00 の セク タ 16 ( デ 
ー タ の 書き 込み が 行わ れ た の は , セク タ 12 ま で で ある が , ブロ ッ ク 単 位 で は セク タ 16 ま で ) 者 で の "中 
ぬけ ? の 部 分 を セク タ ・ ダ ンプ ・ プ ログ ラム で 調べ た 結果 , すべ て に 00 が 記録 ミ きれ て いま し た . 

その ファ イル の 最終 プ ブロック の セク タ ・ ダ ンプ を 次 に 示し ます . 
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ンー 5 5 20 


/ これ 以前 で 。 デー タ ガ 書 き 込ま れ ね て いな い , すべ て の ブロック に は , 
/ 00 ガ 書か ひれ て いる . 1 
| ら この よう に 00 ガ 書か れ て いる 。 

| DISk=B TRACK=O4 SECTUR=16 。 


| BszOQO  QO QO OO QOQ QQO QQ QQ OO 0O QQ QO QOQ QQ _QQO _QO QO 
Bs1O OO QO OO OO QO OO QQ QQO OO QO QOQ OO QO_QO QOQ _QO 
Bs2O QO QQO QQ QO QQ OO 0OQ QO QOQ QQ QQ 0QQO QQ QOQ OO 0Q 
Bs3O  QO QQ OO OO OO oO OQ QO QO OQ _QO OO OO OO OO _QO 
Bs40 OO QQ QO QQ QQ 0QO OO QQO QQ OO QO 0O QQ QQ _QO oOQO 
BsS5O  QQO OO QO OO QOQ QO QQO OO Q0O OO0 0O QO _QO_QOO_QO OO 。・・・・ 
Bi6O  QOQO QQ QO QQ QQO 0Q QQ QO QO QO QQO _QO QQ OOQ QQ _QO 
Bs7O QQO QO QQO QOQ QQ QQ QQ QQ QO QO QO GO QO 0O_ QO_ QO_ 。 


DISK=B TRACK=O4 SECTUR=17 ファ イル \TEST40 . RND/ の 最終 プロ ッ ク . ーーーーー | 
B:OO FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF | 
Bi1O FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF | 
B:20 FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF | 
Bi3O FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF 
Bk4O FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF 
B:5O FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF 
Bi6O FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF 
Bi7O FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF 
。 *- フォ ー マ ッ トレ た まま の , 全く が 付 けら れ て いな い エ リア . | 
・ (PC-8031 ミ ニテ ィ ス フ は \FF* で イニ シャ ライ ズ さ れる ) / 


Figure-2.2.80 ファンクション:40 に よる 00 の 書き 込み の 確認 . 


ラン グダグダ ム ・ ア クセ ス に 関し て は 。 スキ ュー・ ワ アテ タク ネネ の を mmPC>6001 CPZ を 使っ で と ギタ 番 
号 と の 関連 を 理解 し 易い よう 配慮 し まし た が , スキ ュー を 持つ CPM で は , それ ぞ れ の スキ ュー・ フ 
ァ ク タ で セク タ 夕 番 号 が 変換 され て いま す の で 換算 し な けれ ば な り ま せん . ご 注意 下さ い . 


2.3 ラン ダム ・ ア クセ ス に よる 検索 プロ グラ ム の 作成 


今 ま で 解説 を 行っ て きた “シス テム ・ コ ー ル " を 総合 する 意味 で 。 ラン ダム ・ ア クセ ス を 利用 し た , 
"すず 時 見 帳 "と で も 衣 う べき 。 検索 プロ グチ あ を 作っ て み ま し ょ 2 う 、 

ここ で 紹介 する プロ グラ ム は , 筆者 が 「 応 用 CPM」 向け に , 学習 用 と し て で きる だ け 簡 素 に デザ 
イン し た も の で あり , 内 容 は , “電子 早見 帳 *” と し て の 骨子 に 近い 基本 的 な 機能 を 持っ て いる に 過ぎ ま 
せん . し か し , この よう な プロ グラ ム で も , それ を 作成 する に は , CPM に 関す る 広い 知識 と 実際 に 
CP ン M を 操作 し て 開発 を 行う 経験 が 必要 で し ょ う . この 2 . 3 章 は , 言わ ちば CPM 全般 の 基礎 講座 の 
卒業 制作 の よう な も の で す . 


2.93.1 プロ グラ ム の 仕様 


e プロ グラ ム 名 …… 電 子 早見 帳 . 
@ 対象 機種 ………… すべ ペペ で の GPCM マ ジテ 


1 4 


人生 シ ステ ハム ・ コ ー ル 徹 克 誕 説 


@ 機 能 … ひ の の … の の の の 4 デックス (提出 し) と し て チル ファ ベッ キキ 義 放 。 形 基 。 カチ な どの 1 
文字 を 指定 する と , それ に 対応 する 項目 の デー タ が スク リー ン に 表示 され る . 
項目 デー タ の 入力 は , イン デック ス の 1 文字 を 指定 し た 後 。 続け て その デー タ 
を 入力 まる と 枝 ま り 行 ね れ な 、 

@ 収容 可能 項目 数 …42 項 目 

@ 1 項目 当り の 文字 数 …128 文 字 以 内 


仕様 は 、 上 記 の よう な も の で す . 
各 項 目 の 構成 は , 文字 また は 記号 の 1 文字 と 128 文 字 以 内 の 自由 な エリ ア か ら 成 っ て いま す . 図 で 示 


また と 作 の よう に な り ま す , 


還 較 ン デ ックス 


| 項目 の 構成 


128 文字 の 自由 な エリ ア 


Figure-2.3.1 1 項目 内 の デー タ 並 び 


電子 早見 帳 プ ログ ラム の 考え 方 
当 プ ログ ラム の アル ゴリ ズム を 図 で 解説 し まし ょ う . 
当 プ ログ ラム の マッ プ ・ エ リア は , | レコ ー ド の み で ある . 
マッ プ 部 の イン デック ス に 続く レコ ー ド No. に よっ て , デー タ 部 が ラン ダム ・ リ ー ド プラ イト され る . 
当 プ ログ ラム で 作ら れる , 
か かい プー まま か が デザ 


デー タ 部 (| レコー ド に | 項目 が ラン ダム に セー プ さ れ て いる ) ーー ル の 最大 は 42 レ コー ド (42 
項目 ) で ある 


| レコ ー ド 
(それ ぞ れ の レコ ー ド は |I28 バ イト で あり , | つの 項目 を 構成 する ) 


| 3 ベイ ト で 1 つの 項目 を 指し 示す 


し ヘン 


・ バ イト 
( 語 MR レコ ー ド 半 


例え ば と し て Figure-2.93.2 ヾ 電子 早見 帳 ? の アル ゴリ ズム の 図示 


1 ら 50 


ラフ ラン ダム ・ ア クセ ス に よる 検索 プロ ブラ ハム の 作成 


マッ プ の 初期 設定 


マッ プ 部 は ファ イル の 先頭 に あり , 3 バイト 単位 で 1 つの 項目 を 指示 し て いま す . 3 バイ ト の 内 の 
最初 の バイ ト は , イン デック ス と な る キー ワー ド 1 文字 が 格納 され , 続く 2 バイ ト に は その デー タ が 
格納 され る (セク タ の ) ラン ダム ・ レ コー ド No が 格納 され ます . 

マッ プ 部 は , 新しく デー タ ・ フ ァイル を 作成 する 場合 に , 事前 に 必ず 行わ な けれ ば な ら な い 初期 
設定 (N コ マン ド ) で , あら か じ め 次 の 図 に 志す よう に 各 項 目 の レ コー ド No が 書き 込ま れ ま す . 


マッ プ 孝 -。。 
最初 の 3 バイ ト 


と こさ と こさ と 
m で 組 
Jl 二 で m 
ュー ゝ ン ュ ン 


と こい 
m 


/ 

ーーーーー 還 = 

に 者 

8 ps 

| 。 

ー デ 

デー 
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Figure-2.3.3 初期 設定 後 の マ ッ プ 部 


才 。 
WW 
| 
ぶ ご 
N 
| 


この よう に , 3 バイト 単位 の 各 項 目 の イ ン デ ックス 部 に は , すべ て に FFH が 書き 込ま れ . それ に 対 
応 す る レコ ー ド No 部 に は あ ら か じ め , 0001, 0002, 0003…… と , レコ ー ド No が 順番 に 書き 込ま れ ま す . 
当 プ ログ ラム で は , マッ プ 部 が わずか 1 レコ ー ド な の で 次 の レコ ー ド , つま り デ ー タ 部 の 最初 の ラン 
ダム ・ レ コー ド No は , 0001 と な り ま す . も し , マッ プ 部 が n レコ ー ド を 使用 する な ら ば , デー タ 部 の 
最初 の ラン ダム ・ レ コーF ド No は n 二 1 と な り ま す . (この レコ ー ド No の 入出 は , | プ テ ン シンク ション ・ 36 
で 行い ます ). 

イン デック ス 部 に FEFH が 書か れ て いる と , その 項目 以後 の ゲー タ は , “ 未 記 入 ” と みな され ます . 

この よう を な 初期 状態 の マッ プ 部 が ,. ファ イル と し て ディ スク 上 に 作ら れ , “初期 設定 ? の 作業 が 終わ 
る と , 以後 の ディ スク ・ ア クセ ス は , この マッ プ に 従っ て ラン ダム に アク セス さき され, デー タ の 書き 込 
み , 読み 出し が 行わ れ ま す . 


デー タ の 書き 込み 


デー タ の 書き 込み モー ド (I コマ ンド ) に する と , 該当 ファ イル が オー プン され , その マッ プ 部 が 
デフ ォ ル ト の DMA バ ッ フ ァ (80H-FFH) に 読み 込ま れ ま す . 

プロ グラ ム は 決 に , メモ リ 上 に 読み 込ま れ た マッ プ 部 の 各 イ ン デ ックス を サー チ し , FEFH の イン デ 
ックス を 見 つけ ます . その レコ ー ド No が , 次 に 書き 込み を 行う 項目 に 当たり ます . 


主 シ ステ ハム ・ コ ー ル 徹底 解説 


次 は , 項目 の 頭 文 字 を 1 文字 キ 一 入力 し ます . 入力 され た 1 文字 は , マッ プ 部 の 先程 の イン デック 
ス の FFH で あっ た 部 分 に 書き 込ま れ ま す . 

項目 の 頭 文 字 を . メモ リ 上 の マッ プ 部 の イン デック ス ・ ポ イン ト に 書き 込む と , 次 は デー タ の 入力 
919 

各 項 目 の デ ー タ の 文字 数 は , 改行 な ども 含め て 127 文 字 以 下 で な く て は な り ま せん . キー 入力 され た 
デー タ は , 当 プ ログ ラム の 最終 部 に ある 2nd DMA バ ッ フ ァ に 格納 され て 行き ます . 

デー タ の 入力 の 終わ り を 示す Ctrl-Z を 入力 する と , 2nd DMA バ ッ フ ァ の 内 容 が , 先程 , 頭 文 字 を 
書き 込ん だ イン デック ス に 続く 2 バイ ト が 示す レコ ー ド No に 書き 込ま れ ま す . デ ー タ 部 は この よう に , 
入力 が 終わ る と 同時 に ディ スク に 書き 込ま れ ま す が , 新しい マッ プ 部 は , この 時 点 で は まだ ディ スク 
に は 書き 込ま れ て いま せん . マッ プ 部 の ディ スク へ の セー ブ ( つ まり , ディ スク 上 の マッ プ 部 の 更新 ) 
は , 終了 コマ ンド で ある EE コマ ンド を 実行 する こと に より 行わ れ ま す . 


| データ の 表示 | 


ら コ マタ ンド る キー イン すず する こと に より 。 デー ク の サー チ と 表示 の そ モード に な り ま す 、 ジア ァイル を オ 
ー プ ブン し , マッ プ 部 を メモ リ 上 に 読み 出し て 目的 の イン デック ス を サー チ す る 動作 は , デー タ の 入力 
の 場合 と 同じ で す . ファ イル が すでに オー プン され て いる 場合 は , オー プン の 動作 は スキ ッ プ され ま 
す . 

サー チ し た い 項 目 の イ ン デ ックス (1 文字 ) を キー 入力 する と , 前 記 と 同様 に 。 メモ リ 上 の マッ プ 
部 を サー ナチ し て 発見 し た イン デック ス に 対す る レコ ー ド No を 取り 出し ます . そし て , その レコ ー ド を 
ラン ダム ・ リ ー ド し , その 内 容 を コン ソー ル に 表示 し ます . 


プロ グラ ム の 終了 


E コ マン ド の キー イン に より , 当 プ ログ ラム を 終了 し CPM に 戻り ます . も し , マッ プ 部 の 変更 が 
あっ た 場合 は , ディ スク 上 の 古い マッ プ 部 を 新しい マッ プ 部 に 書き 替え ます . 変更 が な か っ た 場合 は , 
何 も 行 わ ず に CPM に 戻り ます . 


当 プ ログ ラム の 目的 は , シス テム ・ コ ー ル の 総合 的 な 応用 と し て , ラン ダム ・ フ ァイル の 簡単 な 応 


用 例 を 実習 する こと に あり ます . よっ て , プロ グラ ム が 複雑 に な る こと を 避け る た め , 基本 的 な 機能 
し か 持た せ て いま せん の で , 当 プ ログ ラム の 実行 に は , 次 の 点 に 注意 し て 下さ い . 


oO ディ スク 上 に すでに 存在 する ファ イル 名 で , 新 フ ァイル の 作成 コマ ンド (N コ マン ド ) を 実行 す 
る と , 同時 に 同名 ファ イル が 作ら れ て し まい ます . 


1 ら 52 


ラン ダム ・ ア クセ ス に よる 検索 プロ ブラ ハム の 作成 ・ 


oO ミ スタ イプ ブ を 訂正 する こと は で きま せん . 一 発 勝負 で す . 

O す で に 入力 され て いる デー タ の 削除 ・ 変 更 す ど は で きま せん . 

oO 同 ヒ じ インデ ックス を 入力 し た 場合 は , 最初 に 入力 し た も の が 読み 出さ れ ま す . 

O 項 目 数 は , た っ た の 42 項 目 し か 収容 で きま せん . 項目 数 の 制限 を 超え て も 警告 は 出 ま せん . 暴走 
する こと に な る で し ょ う . また , 一 項目 の 最大 の 文字 数 127 文 字 に つい て も 同様 で す . た だ し 。 こ 
れ に つい て は 127 文 字 を 超え て も 暴走 する こと は あり ませ ん . 


も ちろ ん , これ ら の 点 を クリ ア す る こと や , 使い 勝手 を 良く する こと は , 実用 プロ グラ ム と し て は 
不可 欠 の こと で す が , ここ で は 基本 的 な 構成 が が それ ん ら に よっ て 見 えな く な っ て は 意味 が あり ませ ん 
の で 我慢 し て 下さ い . 

傘 に 当 電子 早見 帳 ” プロ グラ ム の フロ ー チ ャ ー ト を 示し ます . 


当 プ ログ ラム の 起動 
RNDFILE。,x : 仲 ename. ext 


ロー カル ・ ス タッ クエ リア の 設定 各 フ ラク の イニ シャ ライ ズ 


ファ イル の 作成 
ファ ンク ショ ン : 22 


DMA バ パッ ファ を 
FFH で フィ ル 


生 EN こ 
オー プン 


ファ イル すでに 
ファ イル すでに オー プン ? 


オー プン ? 


ファ イル の クロ ー ズ 
必要 ? 
必要 


メモ リ 上 の マッ プ 部 を 
ディ スク に セー ソ ( 更新 ) 


ファ イル の オー プン 


ファ イル の オー プン マッ プ 都 リンギ 


マッ プ 部 の リー ド 


ディ スク に セー プ ブ 
(シー ケン シャ ル ) 


クロ ー ス 必要 フラ グ の セッ ト 


油 行 当 能 一 Y 昌 G 再 


イン デック ス の 入力 を > 
や セット 。、 デ チェ ッ あ ショ ン ・36 
コン ソー ル 表 カ 


末 記 入 エ リア あり ? 


取り 出し た ラン ダム ・ 
レコ ー ド 半 を 基 に , 各 
イン デック ス に 対す る 
レコ ー ド 寺 を , メモ リ 上 
の マッ プ 部 に 書き 込む 


入力 文字 を マッ プ か ら サ ー チ 
8 re 
その レコ ー ド の 取り 出し イン デック ス 入 力 を 促す 


見 つか | メッ セー ジ 出 力 
ら な い 
コン ソー ル 入 力 
メモ リ 上 の マッ プ 部 に 書き 込み 


デー タ の 入力 を 促す 
メッ セー ジ の 出力 


デー タ の 入力 
Ctrl--Z の 入力 に より 終了 


完成 し た マッ プ 部 を 
再び ディ スク の 同じ 
場所 に 書き 込む 


CPM に 戻る 


該当 レコ ー ド を ラン ダム ・ リ ー ド 


Figure-2.3.4 電子 早見 帳 * の フロ ー チ ャ ー ト 


1 ら 53 


全 シ ステ ハ ・ コ ー ル 徹底 解説 


2.3.2 電子 早見 帳 プ ログ ラム の アセ ンプ ブリ ・ ソ ー ス ・ リ スト 


決 に , 当 プ ログ ラム (RNDFILE) の ソー ス ・ リ スト を PRN 形 式 で 示し ます . この リス ト を 基 に , 
エディ タ を 使っ て ソー ス ・ フ ァイル を 作成 し , ASM お よび LOAD を 実行 し て , “RNDFILE . COM" 
を 生成 し て 下さ い . 

Figure-2.3.4 に 示し た フロ ー チ ャ ー ト と , ソー ス ・ リ スト の 解説 用 の コメ ント を 見 な が ら 追 っ て 行 
け ば , 各部 分 が 何 を 行っ て いる か が , 理解 で きる と 思い ます . 


A:TYPE RNDFILE.PRN / 


5 


を 1 も 
る 1 RQANDOUM FILE mamp1e prOqram ト を 1 
る 1 1 


オオ キオ ネネ ポル ボネ キネ ネル ルオ ルオ ネネ ネネ ネネ ルネ ルキ ネネ キネ ル オル ネネ ルネ ホネ ルネ ホネ ルポ ホメ ネ ネル ネル ネネ な 


9 
JUNE 24 1982 by Y.MURASE 
for ASCII Learning System "CCP/M 析 さ "。 


O1OO DRG 10OH 
QQQOS = BDOS EQU OQOSH シス テム ・ コ ー ル ・ エ ント リ - ポ イン ト . 
QOSC = FCB EQU QOSCH デフ ォ ル ト FCB ア ドレ スズ . 
OQ7D = FCBRO EQU FCB+ さ さ ー- デ フォ ルト FCB の r0 フ ィ ー ル ド の アド レス. 
OQBO = DMAO EQU Oo8oH デフォルト DMA パ バッ ソファ . ラン ダム レコ ー ド マップ 用 
OSB4 = DMA1 EQU DMA1 --2nd DMA バ パッ フ ア . デー タダ 用 . 
QOOD = CR EQU ODH 復帰 コー ド . 
OOOA = LF EQU QAH 改行 コー ド . 
O1OO さ 1B40 さ LX』 8BP。BTAEK ロー カル ・ ス タツ ン 設 定 。 
O10 さ AF XRA 四 1 」 
CO1O4 さ 2BCO さ STA FL$DFEN 「 フ ラブ の イニ シャ ル ・ セ ゼット * 
Q1O7 さ 28DO さ STA FL$NEEDCLS . 
8 くく くく くく くく くく 。 COMMAND BELECT >>>>>>S う >> ーー コマ ンド の 選択 モー ド 
CMDSEL』 
O1OA 11D402 し X 1 D。 MSGSEL 2 
O1OD CDBDO2 CALL Heaour !-* プ ド 選 択 の メッ セー ジ 出 力 
O1 1O CDC さ O2 CALL CON IN ユー ハム 
O11 さ FE5S さ CP 1 * 呈 * も N オ キー エン ヾ DSEARCH* へ ジャ ンプ 
O115S CACSO1 JZ DSEARCH リー チ Go RS り 
O11 コ FE49 CFP 1 も 、 て ペー ベー AA INZ へ ジャ ンプ. 
011A Ca7201 コ 2 au。 リフ イント 2859 BAA ジ ヤ ン ブフ 
O11D FE4E CFPI *N* | \NEW フ ァイル の 作成 "な ら ば 
O11F CA2FO1 JZ NEMFILE NEWFILE" ヘ へ ジャンプ. 
0122 FE45 CPI "E" プログ ラム の 終了 "な ら ば *EXIT" 
O124 CAFBO1 JZ EXIT | へ ジャ ンプ . 
で PVE . Av 。 | どの コマ ンド に も 当て は ま ら な い キ ー 入 力 の 
012C C さ OAO1 JMP CMDBEL あみ 


3 くく くく くく くく くく 。 MAKE NEM FILE >>>>>>>>>> ーー 新 フ タイ ル の 作成. 


NEMFTILEs 
O12F OE16 MV ーー 年 
ーー ペー クボ し 2 メイ ン ・ コマ ッ ド ライ ジ に 凍 が な ファ イル 
QO1 さ 4 CDOSOO CALL BDO0S 
O139 CA7OO2 JZ ERROR 


1 ら 人 4 


O1 さ C 
O1 さ F 
O141 


O14 さ 
Q144 
O1 45 
O146 


0149 
O14A 
O14D 


Q1SO 
O15 さ 
0O154 
O157 


O159 
015A 
O1SB 
O1SC 
Oi SD 
O1SE 
O15F 
O16O 
O16 さ 


O165 
O166 
O169 
O16 ヒ 
O16F 


O172 
O175 
O176 
O179 
O17C 
O17E 


O181 
O18 さ 
O186 
O187 
O18A 
O18D 
O19O 
O19 く 
O196 


0197 
O19^A 
O19D 


O1AO 
QO1A さ 
O1A4 
O1AS 
O1A7Z 
Q1AA 
O1AC 
O1AF 
O1B1 
O1B2 
O1BS5 
O1B6 


C25901 
さ 61 


人 AF 

さ 27COO 
CD9602 
CD7902 
C さ OAO 1 


さ ABCO さ 
さじ 
CAB1O1 
CD1AO2 
さ EFF 

さ 28DO さ 


さ EFF 
CD4CO2 
さ に 
CAOAO1 
1 12AO さ 
CDBDO2 
CDC さ O2 
2ABEO さ 
7 フ 7 


1 1 ら 52O さ 


CDBDO2 
21B4O さ 


C さ AOO1 


MAPMT』 


INSLNAP』 


すく くく くく くく くく く 


DATAIN』 


DATAIN1s 


KEYINi 


ラフ ラン ダム ・ ア クセ ス に よる 検索 プロ ブラ ハム の 作成 


H。OQOBOH 
E。OFFH 
B, 1 28 
デフ オル ト の DMA バ パッ ファ (DMA0 : 80 一 F 


ME FFH) の 126 バ イト 全部 に *FFH” を 書き 込む . 
H 

B 

MAPMT 

人 | FCB の *cr? フ ィ ー ル ド に 00 を セッ ト し て , 
FCB+ さ 2 DMA/ パ パッ ファ の 内 容 を , デ ィ ス ク に シー ケ 
SEQMRITE | ン シ ャ ル な 書き 込み "で セー ブ す る . 


SETRNDRCO -- フ ラン クシ ョ ン : 36^ セ ッ ト ・ ラ ンダ ム ・ レ コ 
) 一 ド " を 実行 し て , 続く レコ ー ド No. を 取り 出 
H。 DMAO | す 


B。 128/ さ | 取り 出し だ た レコ ー ド No. を 量 に , シー ケン シ 
ャ ル に 書き 込ま れ を ランダ ムレ コー ド Na の マ 
H ツ プ に 続い て , ラン ダム に 読み 書き する だ め 


ME の , 各 INDEX に 対 す る レコ ー ド No. を , 

和 1 - DMA0 パ バッ ファ 内 の それ ぞ れ の 位置 に 書き 込 
9 お . 

H | MAP の 最終 に ば ぶ " エ ンド ・ オ ブ プ ・ マ マップ” と し 

9 て 4AH" を 書き 込ん で お ご . 

INSLMAP 

NM。 1 AH 

<] | 


DMA0 パ ッ フ ァ の 内 容 を , 先程 FFH を 書き 込 
の こっ て | ん だ レコ ー ド と 同じ レコ ー ド に , 再 が シー ケ 


Cgae | ン シ ャ ル な 書き 込み で 書き 込む . 
CNDSEL 。 | 終 後 は , コマ ンド ・ セ レク ト へ 戻る . 
DATA INPUT >>> ラ > ララ > ラテ うう ーー デー ダ の 入力 モー ドド . 


、 対象 と する ファ イル が , すでに オー プン され 
FL&GPEN | て いる 場合 は 。 次 を スキ ッ プ レ い DATAIN1 


2 ジャン ツ プ 
5 ファ アイ ル の オー プン 。 レコード No。 マ ッ プ の 
CE - 読み出し. DMA0 へ の 格納 
FLeNEEDCLS か ファ イル ローズ の 秘 要 不 秘 要 フラ ラグ に 

| FFHC 生 要 ) を セッ ト . 

か oe | 本 書き 込み の INDEX LETTER の サー チ . 
: すべ て 書き 込み 済 の 場合 は , コマ ンド ・ セ レ 
ee | クト に 戻る . 
W8gouUT |NDEXLETTER の 入力 メッ セー ジ 出 力 
CON IN 
PTeIDAD | キー 人 入力 . 入力 され だ 文字 を 。, DMA0 内 の INDExX 部 
M。A に 檜 納 . 
D。MSGDATIN 
Pr | デー タ 部 入力 の メッ セー ジ 出 . 
H。DHA1 
CONIN | デー タ 入 力 . 128 文 字 以 内 で ある こと . 
M。A 入力 され だ 文字 は , 2ndDMA パ バッファ CDMA1) 


H に 格納 され て 行 ご . 

1AH | キヤ リッ ジ ・ リ タン を 入力 する と , 自動 的 に ラ 

い (イン フィ ー ド を 付け , 同時 に コン ソー ル に も 
フン イン フィ ー ド を 出力 サ る . 


KEYIN | Ctrl 一 Z を 入力 する と デー タダ 入力 を 終了 レ , 
人 AL し F 次 の "RNDWT" へ ジャ ンプ . Ctrl-Z(1AH) も 
M,A パッ ファ に 格納 され , デー タダ の 最終 を 示す ご 


CONOUT 」 こ に な る . 
H 
KEYIN 


全 シ ステ ハム ・ コ ー ル 徹 克 解 説 


2n920 さ 
227DOO 


- CDBOO2 


CSOAO1 


る ABCO さ 


CDBDO2 


11870 さ 3 
CDBDO2 
21B4QO さ 


C さ EEO1 


さ QBDOS 


227DOO 


OE 1 

118OOO 
CDOSOO 
CDBOO2 


CD7902 
C さ OOOO 


OEQF 
1 15COO 
CDQSQQO 
東寺 まま 
CA7O0O2 
さだ FF 
さ 2BCO さ 


じじ 27002 
CDB702 
AF 

さき 27FOQO 


RNDMT s 


くく く で くく くく くく 
DSEARCH: 


SRCHINs 


DATAUUTs 


EXITi 


8 くく くく OPEN。 


_PMRECC 


だ CB+ さ ざさ | 該当 INDEX に 対 記 する レコ ー ド No. に , 
RNDMRITE DMAI/ \ ッ ファ ア の 内 容 を 書き 込み 、 コ マ 
CMDSEL ンド セレ クト に 戻る . 


DATA SEARCH >>>>>>>> う >> ーー デー タダ の サー チ ヂ モ ー ド 


FLWOPEN | フラ イル ガ す で に オー プン され て いれ ば , 次 


合 N N? 
2 | を スキ ソ プ し て で ^SRCHIN" ヘ ジャ ンプ . 


OPNMPRD ファ イル の オー プン . レ コー ド No. マッ プ の 
先 み 出し . DMA0 へ の 格納 . 


D, MSGSRCH ( ーー こら < 

CONIN し ポーチ IMPEX の あつ 

SEARCH . 入力 INDEX の サー チ . 雪 当 ラシン ヅ バ ハレ ゴー ド 
ム 6 ) # の 取り 出し . 見 つか ら な けれ ね ば, コマ ンド ・ 


CMDSEL セレ ント に 戻る . 

FCB+ さ さ FCB の r0,r1 フ ィ ー ル ドレ コー ド No. を セ 

RNDREAD | シト し て , ラ ンダ ハム ・ リ ー ド . デ ー タ は DMA 1 
に 格納 され る . 


D。 MSGCRLF 、) 
MBBDUT (復帰 ・ 改行 を コン ソー ル に 出力 . 

H。 DNMA 1 

AN | サー チ さ れ て 読み 出さ れ だ 内 容 CDMA1) を コ 
1 人 H 1 シリ ソー ル に 出 力 . 


CMDSEL 0 ンジ ーー 
EONOUT | する 
H 


DATAOUT 


END。 CLHSE FILE & EXIT >> ッ > ッッ > ッッ ラフ ッッ 


(マッ プ 部 の 書き 込み . ファ イル の フロ ー ズ ) 
FL$NEEDCLS 、 フ ァイル の フロ ー ズ が 秘 要 か どう か の フラ グ 


^ ム ) を 見 て , 生 要 で な け ね ば ぱ ば, そのまま! リプ ー ト 
OOQQOH し て CPM に 戻る . 
PM ま RECO . 


H 、 FCB の r0, 1 フィ ー ル ド に , レコ ー ド No. マ ッ 
FCB+ さ さ 「 プ 部 の レコ ー ド No. を セツ ト 、 


C。26 | DMA パ ッ フ ァ を レコ ー ド No. マップ に 使用 


5。DMAo 「 レ し て いる DMA0 に 設定 . 
RNDMRITE フン ダム な 書き 込み を 実行 


CLOSE | 
ooooH ! フタ ァイル を フロ ー ズ し て , リブ ー ト で CP ノ M に 戻る . 


READ MAP AREA INTO DMAO。 SET RND REC > うみ ッ >> 


OPNMPRDI (ノア イル の オー ブン . マッ ツブ 部 の リー ド . 次 の り ラン ダム No. の セツ ト . ) 


C。15 

D。FCB 

BDOG 

2SS ファ イル の ズー プン. 
ERROR 

A。 OFFH 

FL$ ロ PEN 


1 

FCB+ さ 2 

F,26 | ファ イル の 最初 の レコ ー ド の シー ケン シャ ル 
な リー ド 、 

BD05S 

1 

ERROR 


SETRNDRCO それ に 続く ラン ダム ・ レ コー ド No. の セツ ト . 


人 | ラン ダム な リー ド バ ラ イト に 備え て , 
FCB+ さ 5 FCB の r2 フ ィ ー ル ド を 0 グリア . 


024 さ 
QO245 
0248 
O24B 


024 じ 
O24D 


025O 
Q251 
O25 さ 
OS2S6 
0257 
OQO25A 
QO2SD 


Q0260 
026 さ 
0264 
Q0265 
0266 
0267 
O26 日 
9 アマ ー) | 
Q026 ビ 


Q026D 
O26F 


02Z7O 
02 7 さく 
Q27 プ 6 


0279 
027B 
027E 
02 1 
02 昌 く 
Q2B6 


02 昌 7 
02 フ 
02BC 
028F 
O292 
0295 


O296 
O29 ピ 8 
QO29B 
O29E 
O29F 
O2A2 


O2A さ 
02A5 
QO2A 
O2AB 
O2AC 
O2AF 


OE1A 

1 1B4Q ミ 
CDOS5OGO 
9 


4 フ 
2180QQO 


ソコ 
FE1A 
CA6DO2 
BB 
CA600 タ 2 
2 ささ 2 る 
C さ 5QOQ2 


<2BEO さ 
< さ 
に 1 コ 
2 さる 
ら 6 
EB 
<2920 さ 
AF 
に ラサ 


さ EFF 
C9 


111EO さ 
CDBDO2 
C3OQQO 


OE10 
11SCOQ 
CDOSOQ 
5 コ 
CA7O0O2 
C9 


OE24 
11SCOO 
CDOSQO 
27DOO 
229OQ さ 
9 


OE 15 
115COO 
CDQOSQO 
B7 
C27002 


フン ダム ・ ア クセ ス に よる 検索 プロ ブラ ム の 作成 


MV1 C。26 に 
に D。DMA1 | これ か ら の DMA パ ッ フ ア を ,2ndD ト MA シン 
CALL BD0S ア の DMA1 に 設定 . 
RET 
sKKS く SSS く くく SEARCH INDEX LETTER >>> ラ ララ > ラテ ッ > ッ > 
SEARCH: (INDEX の サー チ ) 
MOV B, Aa 
し X 1 H。 DMAQO 
NXTIDXs | | 
NOV AN | | 
CF 1 1AH | 
JZ NDTF IND | | 
CMF B | 
JZ JUST [ A レ ジス マタ に 格納 され て いる , サー チ ( の 対象 | 
INX H! INX H! INX H トコ 双 字 を , DMA()/ ペッ ソフ フ ア 2 内 の 将 INDE X 部 か ら | 
JMF NXTIDX | 十 し 出す . 抑 つ か みれ ば , その INDEX の DMA 0 | 
JUSTi | 内 の アド レス を "PTSDAD" ビ セツ ト . それ | 
SHLD PT ま IDAD | に 対 記 する ラン ダム ・ レ コー ド No. を , “PT 
1NX H -$IDAD“ に セッ ト . その INDEX が 見 つか ら 
Mo PT な い 場 合 は , ヘ レジ スタ に FFH を セッ トレ て 
1 に まく ソ 
NM むつ へ RA 
2 と | 見 つか つ だ 場合 は , 00 を セット し て リマ タン. 
SHLD PM ま RECC 
XRA A 
RET 
NOTF IND: 
MV1 Aa。 OFFH | 
RET | 
| 
8 くく くく < くく < くく ERROR >>>>>>>>>> (すべ て の エラ ー 処 理 | 
ERRORs 
LXI D.MSGERR の 3 
CALL MSBOUT ラー メッツ セー ジ を 出力 し , リプ ー ト し で OP  M に 戻る . 
JMP QQQOH 
8 で で くく くく べく ぐ で く で FILE CLOSE >>>>> う > っ > うう (ソフ ア イル の ソロ ロー スズ) 
CLOSE: 
MV1 C。16 
LXI D,FCB 
CALL BDQS ファ イル の フロー ズ | 
CF'1 で) に 0 
JZ ERROR 
RET 
8 くべ NKSS く で くく 。 SET RANDOMN RECORD ラテ ッ ラテ ッッ > テッ ラッ ' 
SETRNDRCO: (ラン アム コー ド No. の セツ ト ) 
MVI C。 さ 6 | 
LXI D,FCB シー ケン シャ ル な リー ドラ イト に ピ 続 く , ラ 
CALL BDOS ンダ ハム ハ 、・ レ コー ド ビ No. 左 FC 2B の Fr0,。 4 フイ ー | 
LHLD ん こい この や の 
SHLD PMwREco | ルビ に セッ ント す る 
RET | 
3 くく くく くく くく くく BEQRUENTIAL MRITE >>>>>55 う 5>> (シー ケン シャ ル な 書き 込み ) 
SEQMWR 1 TE ェ 
MV1 に じ 。2} | 
LX 1 D。FCB | 
CALL BDOBS シー- ケ ン シ ャ ルル な 書き 込み | 
RA ん シー ケン シヤ ャ ヤル な お 書き 込み . | 
JNZ ERROR | 
RET 
3 くく くく べく くく くく RANDOM READ 1 RECORD >>>>>>5>>>> (フン ダム ふ ・ ワ リー ド ) | 
RNDREAD』 | 
MV1 に 、 さ う 
LX 1 D,FCB 
CALL BDOS = っ < アナ / 、 ナ TI | 
デー ス ラン ダム へ な し 
JNZ ERROR 
RET 


1 ら フ 


全 シ ステ ハハ ・ コ ー ル 徹底 解説 
すく くく くく くく くく く RANDDM MRITE 1 RECORD >>>>>>>>>> (ラン ダム 、 ライト) 
RNDMR ITE』 
O2BO OE22 MVI C。 さ 4 
O2B2 115COO LX : D,FCB 
Oo2BS CDoOSoo CALL BDOS 。。 8 
Q2BB B7 ORA A 「 ラン ダム な 書き 込み . 
O2B9 C27002 JNZ ERROR 
O2BC C9 RET 
3# く くく <<< 。 MESSEGE OUT. STRING ADR ON REGB.D。E >>>>> (メッ ピー ジェ アジア ウト) 
MSGDUT 』 
O2BD OEO9 MVI C。9 4 1 っ 
Oo2BF CDO5oo CALL BDQS 7 の だ ピー ジ を , 
O2C2 C9 RET の MC 
5 くく くく くく くく < くく 。 CONSDLE INPUT。 DATA ON REB.A >>>>>>>>>> に コン ソー ル 入 力 ) 
CONINi 
O2C さ E5 PUSH H 
O2C4 OEO1 MVi に 1 
O2C6 CDOSOO CALL BDOS コン ソー ル か ガ ら 1 文字 入力 . 
O2C9 E1 PDP H | 
O2CA C9 RET 
8 くく くく くく くく くく 。 CDNBOLE 0UT.。 REG.A OUT >>>>>>5>> テ (コン ソー ル 出 力 ) 
COUNOUT 
O2CB E5 PUSH H 
O2CC OEO2 MVI ヒ 。2 | 
O2CE SF MQV 諾 っ 内 | ー こっ 
O2CF CDOSOO CALL BDDS A レ ジス の 文字 を , コン ソー ル に 出力 . 
O2D2 E1 PP 
O2D さ C9 RET 
以下 メ ツ セージ 文 字 列 エリ ア . 
O2D4 ODOAODOA5S さ MSGBSELs 。 DB CR。LF。CR。LF。"SELECT COMMAND* 。 CR。 し F 
O2EB 5 さ 29656172 DB  "S)earch。 1I)nput。 N)ew file。 E)xit。 ( /I/N/E )? >" 
O さ 1E ODOA455252 MSBERR』 DB CR,。LF。'ERROR !" 。CR。LF。" 
O さ 2 ODOQAODOA49 MSBIDXIN』 DB CR。LF。CR。LF。" INPUT . INDEX LETTER (1 CHARACTER) >*" 
OS52 ODOAODOA49 MSBDATIN』 DB CR。LF,CR,。LF。" INPUT DATA' 。CR。LF。 CR。LF。' > 
0O366 ODOAODOA49 MSGSRCH』 DB CR,。LF。CR。LF。" INPUT SEARCH INDEX LETTER >** 
OSB7 ODOAODOA24 MSGBCRLFk DB CR。LF。CR。LF。"$* 
O3BC FLeOPEN0 DB 1 '、 
O38D FLWNEEDCLSsDS 1 
OSBE PT$IDAD』 DS 2 | 
FC Et ラグ. アド レス ・ ポ イン タダ 。/ パ ラメ ー タ 
\ \\ 
One eo | DMA1/ ッ フ アァ . スタ ツク の 工 ノア . 
OSB4 = STACk EQU $ 
OSB4 DMA1』 DS 128 
O4 さ 4 END 
A> 
Figure-2.3.5 電子 早 見 帳 "” プロ グラ ム の ソー ス ・ リ スト . 


2.3.3 電子 早見 帳 プ ログ ラム の 実行 
当 プ ログ ラム を 実行 する た め の コ マン ド 形 式 を 次 に 示し ます . 


RNDFILE。.x : filename . ext/ 


に っ テー い 
トー トー す 


X : は ドラ イブ 名 (ログ イン ・ デ ヂ ディスク の 場合 は 省略 で きる ), filename . ext は , 検索 を 
行 お うと する デー タ ・ フ ァイル 名 , ある い は , 新しく 作成 し よう と する デー タ ・ フ ァイル 名 の こと で す . 
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ラン ダム ・ ア クセ ス に よる 模索 プロ ブラ ム の 作成 


新 デ ー タ ・ フ ァイル の 作成 


で は ブロ グラ ム を 実行 し て み ま し ょ う . まだ デー タ ・ フ ァイル は 何 も 作 られ て いま せん の で , まず . 

新 フ ァイル の 作成 ” を 行い ます . 

入力 する デー タ は , 住所 録 と か , 何 か の リス ト と か , 適当 な も の と し ます が , ここ て 示す 例 は 。 大 
抵 の 本 の 巻末 に ある “ページ 索 引 ” を 利用 し まし た . 使っ た 本 は , 「The CP ン M handbook」 で す . 


新しく 作成 する “ペー ジ 索 引 ” の デー タ ・ フ ァイル 名 を , "CPMINDEX . IDX′ と し て 実行 し た 例 
を 次 に 示し ます . 


A>RNDFILE CPHINDEX.TDX) 新しい ファ イル *CPMINDEX. IDX“ を 作り , デー タ を 書き 込む . 


SELECT COMMAND 
S)earch。 1I)nput。 N)Dew file。 E)x1t。 ( B/1I/N/E )? >N 新 フ ァイル の 作成 コマ ンド を 実行 . 


SELECT _ COMMAND 
S)earch。 1I)nput。 N)ew fi1e。 E)xit。 ( 8/I/N/E )? >I ーー デー マタ の 入力 モー ド を 選択 


INFUT INDEX LETTER (1 CHARACTER) 。 > イン デック ズ "A" の 項目 を 入力 . 
INPUT DATA 


>QBOURT 』 1O1。219 
acCtive User zi 7Z6 
Qppend 』 1 さく 1 

QSNM 』 日 1。221 
ATTACH 』 102.212.22 さ 
Cr 


< 項 上 国 *A“ の デー タ を 入力 . 
合 フ ライ ン の 終わ り に は , CR グ LF を 入力 する ご こと. 
LF( 改 行 ) は Ctrl-J で 代用 で きる . 
そ ね ぞ れ の 項目 の デー 容量 は 128 バ イト 以内 . 
デー タダ の 最後 に は Ctrl-Z を 入力 する . 

SELECT COMMAND 


5)earch。 『)nput。 N)eww file。 E)xi 上 。 ( 8/i』/N/E )2 >1』 - 入力 モー ド 選 択 . 


INPUT INDEX LETTER (1 CHARACTER) > イン テッ フス *S/ を 入力 . 
INPUT DATA 

>BAVE 』 3O。249 
SCHED 』 25,94。10O 
SPOOL 』 94,257 
STAT 』 67。68, 259 ・ 項目 *S? の デー タ を 入力. 


SUBMIT 』k 76。26 さ 
System Di5ket 』 1。1 さ 。2 つ さ 。65 


SELECT COMMAND 
S)earcCh。 1I)nput。 N)ew fi1e。 E)xit。 ( 8/I/N/E )? >! 入力 モー ド 選 択 . 


INPUT INDEX LETTER (1 CHARACTER) 。 >M インデックス \M" を 入力 . 
INPUT DATA 


>Machine 1anquage : 1 
MBASIC gi 42 

MDS-BOO 』 191 

Memory sz 2 

MOUVECPM 』 198。240。24 さ 
MP/M 』 209 

NE 


ー 貴 目 M" の デー タイ を 入力 . 


SELECT CONMMAND 3 
S)earch。 1I)npDut。 N)ew fi1e。 EE)x ぷ 1 て 。 4 線 / ま / 締 / ) イ >! ーー 入力 モー ド 選 択 . 


158 


全 シ ステ ム ・ コ ー ル 徹底 解説 


| INPUT INDEX LETTER (1 CHQARACTER ) 
| INPUT DATA 


>DDT 』 日 6。225 
Debuqqinq sz 日 6 

り も し も を 『 も 』 22 
Di と 上 Ory 』 2 くさ 。61 
Disk drive 』 20 
Doub1eーden5sity 』 71 
アン 
 、 BELECT COHMAND 

| 5 ) @ ゅ FCh。 IT)nDu モ 上 。 N)ew 人 f11e。 E)x ュ it。 ( 科 / ま /N/K ) ア チッ 入力 モー ド 選 択 . 


INFUT INDEX LETTER (1 CHARACTER)  :P 
INPUT DATA 


>Parity 』 1 さく 6 
Pa5 い OFd gi 1 日 7 
PIP 』 34。40。109。249 


どす の も を と 4 さ 

PrOC 刀 呈 5 』 10S 

PUTSYS 』 198 

2 

SELECT COMMAND 

5 ) ぬこ h。 IT)nDut 上 。 N)ew fi1 司 。 E) ぷ 1 人 。 ( 8/1/N/E )2 うま 入力 モー に ド 選択 


INPFUT INDEX LETTER (1 CHAKACTER) >:B 
INPUT DATA 


>BaCkKup 』 さ Z 

BASIC 』 26 

BDUS 』 68。182。185。 194 
Binary sz 日 1 


Boot 』 1 る 3。194 
Bootstrap 1oader si 5 
Byte i 6 

0 


SELECT _ COMMAND 
らら) 壁 ろ と と h。 IT)nDut。 N)e@w fi1 与 。 E)xi ト 。 (SB/I/N/E )? 5E ディ スク 上 の マッ ソ プ 部 が 更新 され , 


グラ ハム を 終了 
仙 > 


Figure-2.3.6 電子 早見 帳 ” の 実行 。 新 デー タ ・ フ ァイル を 作成 する . 


| デー タ の 検索 


いよ いよ 電子 早見 帳 の 利用 で す . 先程 作成 し た ページ 索引 ” の デー タ ・ フ ァイル を 検索 し て み ま 
まで 。 
実行 例 を 次 に 示し ます . 
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ダム ハ ・ ア クセ ス に よる 検索 プロ ブラ ム の 作成 


| 
し プ 


A>RNDF ILE CPMINDEX.IDX / た で に 2 ッ ガ 書き 込ま れれ で いる ファ イル `CPMINBDEX. IDX に 


SELECT COHHAND 
8)@arCh。 1)n ロ put。 N)ew fi1e。 E)xit。 ( /I/N/E )? >5 - デー 
INPUT SEARCH INDEX LETTER >:D の 2 ' 


DDT 』i 6。225 
Debuqq1nq 』 日 6 
UE た だ は EE + デス 
DiFe に も Ory 』 2 くさ 。61 
Di5sk drive 』 20 
Double-density gi 71 


SELECT COUMMAND 
S)earch。 II)nDut。 N)ew fi1e。 E)x ュ トキ 。 ( 8/! ま /M/E )? > ら 5 
INPUT SEARCH INDEX LETTER > と P ウッ ェ サ ー 


Farity 』 1 さら 6 
Pa ほ =5wOFrd 』 187 
PIP 』 さ 4。40。109。249 


Printer s さ 
ProcCeS555 3 105 
PUTSYG s』 19 日 


SELECT COMMAND 
S) earch。 I)nput, N)ew file。 E)xit。 ( 8/I/N/E )? 58 
INPUT SEARCH INDEX LETTER >M アンデ ックス \M? な ね 


Machine 1anquaq@e : 日 1 
MBASIC 』 42 

MDS- ヨ 0O 』 191 

Memory 』 

MOVECPNMN 』 198。240。24 さ 


MP/M 』 209 


SELECT COMNMAND 
ら ) ach。 IT)nDut。 N)ew fi1。 EE)x1it。 (5/4/N/E )7 っ 5 再び デー ツマ の サー ラ 
INPUT SEARCH INDEX LETTER > イン デック フス \A/ を サー ラ 


QBURT 』 101。219 
内 ヒ t ュ 1v 握 昌史 司 ビ sg 76 
QpDpeGnd 』 1 さく 1 

ABM 。 日 1 。221 

ATTACH = 102。 つ 12。 つ 2 さ 


SELECT CUMMAND 
5) 己 arCh。 T)nDut。 N)ew fi]1 呈 。 E)※ ぷ ※ ュ キト 。 を / ま /M/ に )7 2 た 


人 n > 


Figure-2.3.7 電子 早 見 帳 ” の 実行 . デー タ ・ フ ァイル の 検索 . 


も 信 1 


和仁 シス テハ ・ コ ー ル 徹底 衣 説 


2.3.4 ディ スク 内 部 に お ける デー タ の 記録 状態 


ディ スク 上 に ファ イル され た デー タ が , 実際 に どの よう に 記録 され て いる か を 見 て み ま し ょ う 。, 今 
作成 し た “CPMINDEX . IDX” の デー タ ・ フ ァイル (6 項目 の み 入 力 さ れ て いる ) の マッ プ 部 と デー 
タ 部 の 最初 で ある , “A” の 項 の レコ ー ド を セク タ ・ ダ ンプ し て 示し ます . どこ の セク タ に 格納 され て 
いる か は , ディ スク の 他 の ファ イル の 格納 状況 に より ます の で , デー タ ・ フ ァイル の マッ プ 部 か ら で 
は 揚 し 出す こと は で きま せん . 


ゴチ ソン ズム イッ テッ ンス 9 


ni ' CN 未 書 き 込 み の マ ツ プ ・ 革 リア. イン プッ ジ ス は"FF' て で ある. 
D15S に = 。 TRACK ド =0 さ SECTUR=11 ご 
41 | 


As OO |O1 QQ][5 さ | Q2 QQ][4D] o さ Oo [44] o4 Qoo [5Q] Q5 oOQ [42] A..8..M..D..P..B 
Ak1O O6 OO FF 0Q フ 7 OO FF GB OO FF O9 OO FF OQ OO FF OB 。。。。。...・ に 
AI20 OO FFP OC OO PF QD QO PF OE OO FF OF OO PF 10 OO  。。。。。.。。。。。。。。 < 
Ni30 NM 13 00 0 ド 12 0O0 PF 13 0O FFP 14 00 PF 19 00 PF  。。、。。、。。、。。。> > 
As4O 16 OO FF 17 OO FF 1 OO FF 19 .00 FF 1 OO FF 3B  。、。。。。。。 < 
N90 00 PF 1C QO PF 1D 0O0 FF 1E OO FF 1F 00 FF 20 00  。。。。。。。。 < 
As6O  FF 21 OO FF 22 OO FF 2 ミ OO FF 24 OO FF 25 OO FF  。!。、"。。 笠 。。、 あ 。。 ん 。。 
Ak7O 26 OO FF 27 OO FF 2 OO FF 29 0O FF 2 OO[1AlFF  &。。"。。(。。) 。.* ま 。。 


イン デ ッ ン ス と その レコ ー ド No. を 格納 し だ た マ ツブ プ 部 の セク フタ ・ ダ ンプ . 


マッ プ の 最終 を 示す マー カ . 
書き 込ま れ て いる デー タ . 


DIS に =A__ TRACK=O く SECTUR=17 


Ag OO BUORT 』 1O01。219。 
仙 3 1O 。QCtiyve User si / 
仙 g 20 ら 6。。 QpDpPeGnd 5 1 く 31。 
3 さ O ・QSM 』 日 1。221 。。 人 An 
人 40 


TTACH 』 102。212。 
Ai SO Er:】 22 さ 。 . 。 TB R/0。 DE 
Ai6O /4C 45 54 45 2O 2859 2F 4E 29 さ F 24 2 2 4E 4F LETE (Y/N) 2***ND 
As7O/ 54 20 44 45 4C 45 54 45 44 2 20 24 24 24*24 24  T DELETED** 生 多久 
デー タダ の 終了 未 使用 工 リ ジア . 
イン デック ス \A* の 項目 に 当たる レコ ー ド の セ フ タ ・ ダ ンプ , 


Figure-2.3.8 デー タ ・ フ ァイル の ディ スク 上 の 記録 状態 . 


9 慕 マク ロ ・ ア を ンプ ブラ および 
リン グ ・ ロ ー ダ に よる ソフ 人 診 発 


MAC こ と (Z) SID の 使用 例 と マク ロ ・ ラ イブ ラリ の 利用 法 


ここ で は , 代表 的 な アセ ンプ ブラ で ぁ る MAC, “RMAC*。 MACRO-80/ の 3 種類 と , リン ク ・ 
ロー ダ の “LINK-80?。 それに , シン ボリ ッ ク ・ イ ンス トラ クシ ョ ン ・ デ バッ ガ の SID?,」 ZSID′ を 
取り 上 げ , それ ぞ れ の 機能 の 概要 や , 実際 の ソフ トウ ェ ア 開 発 (8080 お よび Z80) な ど を 紹介 し ます . 

本 書 で , それ ぞ れ を 詳細 に 語る こと は 不可 能 (それ ぞ れ が 厚い マニ ュ ア ル と な る ) な の で , ここ で 
紹介 する の は 機能 の 一 部 , 使い 方 の 一 例 で ある こと を お 断り し て お きま す . 


3.1 MAC と (Z)SID の 使用 例 と マク ロ ・ ラ イブ ラリ の 利用 法 


デジ タル リ サー チ 社 の マク ロ ・ ア セン プラ で ある *MAC” は , CPM ユー ザー の 中 で は ,。 標準 アセ 
ンプ ラ の “ASM" 以外 で , 誰 ら く 一 番 多く 使わ れ て いる アセ ンプ ブラ で は な いか と 思い ます . 

例え ば , NEC の PC-8000 レ シリ ー ズ CPM も , PDA-800 CPM も , 沖の if-800 CP ン M も , 富士 通 
の FM-8 CPM も , この "MAC? を 使っ て 作ら れ て いま す . 他 の 機種 の CPM も, は と ん ど は この 
アセ ンプ ブラ を 使っ て 作ら れ て いる こと で し ょ う . 

この アセ ンプ ラ に は , 後程 解説 し ます が , CPM の シス テム ・ コ ー ル を 利用 し た 各種 サ プ ブルー チン 
が , マク ロ ・ ラ イブ ラリ と し て 提供 され て いま す . また , 1 章 で 解説 し た , CPM を 各 機 種 に イン プ 
リ メ ン ト す る 場合 に 便利 な ライ ブラ リ も 提供 され て いま す . よっ て , 特に CP ン M を イン プリ メン ト し 
た り , CPM 上 で 実行 する 各種 ソフ ト を 開発 する ユー ザー に と っ て , 一 度 は 使わ な けれ ば な ら な いで 
あろ う 必 席 品 と 言え る で し ょ う . 


39.1.1 MAC の 機能 


MAC は , イン テル 形式 の 8080 ニ ー モ ニッ ク , お よび イン テル ・ ニ ー モ ニッ ク 拡 張 形式 の Z80 ニ ー モ 
ニッ ク を アセ ン ブ ル し , イン テル HEX 形 式 の オブ ジェ クト ・ フ ァイル と ,。 PRN リス ト ・ フ ァイル ,。 そ 
れ に シン ボル ・ テ ー ブ ル の リス ト ・ フ ァイル を 出力 する , マク ロ 機 能 を 持っ た アセ ンプ ブラ で す . た だ 
し , リロ ケー タブ ル な オプ ジェ クト ・ コ ー ド を 出力 する 機能 は あり ませ ん . 

Z80 の アセ モン ブル は , アセ ンプ ブラ 本 体 に 280 の アセ ンプ ブラ が 内 蔵 さ れ て いる 訳 で は な く , “2Z80 . LIB? 
と いう Z80 を アセ ンプ ブル する た め の ラ イブ ラリ を , マク ロ 機 能 を 使っ て 取り 込む こと に より 実現 し て ぃ 
ます . 同様 に “18085. LIB” に より , 8085 に も 対応 で きま す . 


3.1.2 MAC の 使い 方 実例 


マク ロ 定 義 と 定義 され た マク ロ の 使用 例 


ログ ラム 中 で 使用 する 簡単 な 例 を 示し ます . “ 
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定義 する マク ロ は , 次 の 3 種 で す . 


マク ロ 名 機能 

ALLPUSH すべ て の レジ スタ の 退避 を 行う . 

ALLPOP ALLPUSH と 送 に 。 すべ て の レジ スタ の 復帰 を 行う . 

MSGOUT ダミー・ ポ ラテ ー タ 郡 た 配 述 も し た メッ セー ジ を マン シー に 出 峡 する 、 そし で : 
メッ セー ジ の 前 後に は , 自動 的 に 復帰 ・ 改 行 を 挿入 する . 


持 記 の 3 種 の マク ロ を 定義 し て, ご 衝 な を 利用 する プロ グラ ム を せつ の ソー ズ で フロ グラ グラム と し て 
作成 し ます 。 この ソー ス ・ プ ログ ラム 例 を 次 に 示し ます 。 フ ァイル 名 の エク ステ ンション は , ASM" 
で な 7 才 ば な り ま せん , 


A>TYPE_ SNPL1HAC.。ASM ) マフ ロ 定 義 と それ を 使用 し だ サン ブル ・ プ ロ プ ラム の ソー ス ・ フ ァイル , 
ファ イル 名 の エフ ステ ンション は , \ASM" で な けれ ば な ら な い . 
311111613111141111631411131143111144131111111113141111. 


1 MAC SAMFLE PRDGRAM 1 る 
1 STODRED MACRO キネ 
オオ ネネ ネネ ボネ ネル ネネ ネネ ネネ ネネ ルポ キネ ネネ ボネ ポポ ネネ ポポ ボ ネネ ポキ パネ ポ ポポ ネネ ポキ 
_ ORG 10OH ユー ザー 独自 の マク ロ 名 を 定義 . ー 
8 くく くく くく くく くく 。 MACERUD DEFINITIODN >>> ッ > ララ > ララ > 
[ALLPUSH| IMACRI 。 *ALLPUSH" と いう マク フロ 名 で , MACROーENDM 間 に 記述 され だ ステ ー ト メン ト 


PUSH PAM | を 登録 する . 


PUSH B ご の 部 分 が , マク ロ 名 *ALLPUSH/ と し て 登録 され る . 
PUSH D | (9 すべて の レジ スタ の 退避 ) 


ENDM | 


IALLPOF_] [MACR ロ | 
P ロ P H 
POP D 上 と 同様 に , この 部 分 ザマ フロ 名 *ALLPOP* と し て 登録 され る . 
B (すべ て の レジ スタ の 復帰 ) 
P 


PP 
POP 
ENDM | ダミ ー・ パ ラメ ー タ 
IMSGOUT |] MESS 
LOCAL MESBUF。MDUT 


JPMP MDUT 同様 に , マグロ 名 *MSGOUT* と し て 登 
MESBUF : DB ODH,OAH。' &MESS* 。 ODH。 OAH。" "| 録 す る . ( ツ ミ ー・ パ ラメ ー マ *MESS? 
MNOUT: 。 MV1 C。9 ア 4 の 部 分 に 置か れる 文字 列 を コン ソー ル 
LX1 D。MESBUF  , に 表示 する ) 
CALL o008H | 
ENDM 」 に ! 
ー ! 上 で 定義 し た マク ロ 名 を 利用 し て , 簡単 な プロ グラ ム を 作る . 
We っ 0 1 3 で 
て たく くく く て さく ve 、 ン PROUGRAM る すべ て の レジ ス 
ALLPUSH ! を 退避 し て , 
MSGUUT | く #※※ THIS 15 MAC SAMPLE PROGRANM 2 まま まっ > メッ ピー ジ を 表 
ALLPOP ト 、、 実際 の 文字 列 示し , すべ て の 
MSGODUT <END> チー 
実際 の 文字 列 の ペン こつ 宮 


RET - | 表示 ずる. と い 
END 


Figure-3.1.1 マク 定義 と 定義 され た マク ロ の 使用 例 の サン プル ・ プ ログ ラム の ソー ス ・ フ ァイル . 
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MAC こ と (Z) SID の 使用 例 と マク ロ ・ ラ イブ ラリ の 利用 法 


炊 に ソー ス ・ フ ァイル を , MAC を 使っ て アセ ンプ ブル し ます . アセ ンプ ブル を 実行 する 時 の コマ ンド ・ 
フィ ン に , アデ モン プリ ・ パ ラメ ー タ を 付け る こと に より, - ア セン プル 実生 時 の 和 大 カジ 出力 ファ イル の 
各種 の コン トロ ー ル な ど が 行え を ます が , ここ で は 一 番 単純 な コマ ンド で 実行 し ます . 

アセ ンプ ブル の 実行 例 を 次 に 示し ます . 


/ AA>MaAC_SMPL1MAC 7 - ソー ス ・ フ ァイル *SMPL1 MAC. ASM^ を MAC で アセ ンプ ル す る . 
CP/M MACROD ASSEM 2.0 

O1SO 

OO2H _ USE FACTOR 

END OF ASSEMBLY 


仙 > アセ ンプ ブル 終了 ず . / 


Figure-3.1.2 MAC に よる アセ ンプ ブル の 実行 . 


アセ ンプ ブル が 正常 に 終了 し まし た . ソー ス ・ フ ァイル “SMPL1MAC . ASM” か ら , 次 の 各 フ ァ イ 
ル が 生成 され まし た . DIR で 示し ます . その 後 で 。 LOAD コ マン ド に より "COM” フ ァイル を 生成 に 
再び DIR で 各 フ ァイル を 確認 し て み ま し ょ う ). 


A>DIR SMPL1MAC.* ) アセンブル に より 作ら れ だ 各種 ファ イル の 確認 . 
Ai SMPL1MAC ASM 』 BMPL1MAC PRN 』 SMPL1NAC HEX 』 BMPL1MAC SYM 
ソー ス ・ フ ァイル リス ト ・ フ ァイル HEX オ ブ ジ ェクト ・ フ ァイル * 
A>LOAD SMPL1MAC ) - LOAD コマ ンド で MAC で は , シン ボル テー ブル の ファ イル も 


COM フ ァイル に 変 拠 . 作ら れる . だ だ し この 例 で は メイ ンプ ログ 
ラム に シン ボル を 使 こ て な い の で , ファ イ 

FIRST ADDRESS O1oO ル の 内 容 は 中 で ある . て 後述) 

LAST ADDRESS O14F 


BYTES READ QOSO 
RECURDS MRITTEN Q1 


A>DIR SMPL1MAC。* / 生成 され だ COM フ ァイル の 確認 . 

Ai SMPL1MAC COM 』 SMPL1MAC ASM : SMPL1MAC PRN 』 BMPL1MAC HEX 
Ai SMPL1MAC SYM 

A> 


Figure-3.1.3 ーーーーーーーーーーーーー ーーーー ブ 
の 生成 . 


以上 の 手順 で , 実行 可能 な “COM” ファ イル SMPL1MAC . COM” が で き 上 り ま し た . 
と りあ くず すず,。 この プロ グラ ム を 実行 し て み ま し ょ う ). 


の に 
A>SMPL1MAC 】 サン ブル ・ プ ログ ラム の 実行 . 
ま #*※ THIG 1S MAC SAMFLE PROUGRANM 2 つ #*#※ 


END 


> 表示 され だ この 2 つの メッ セー ジ と , Figure-3.1.1 の メイ ンプ ログ ラム 部 を 比較 し て 下さ い . 


Figure-3.1.4 サン プル ・ プ ログ ラム の 実行 . 
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この よう に , Figure-3.1.1 の ソー ス ・ フ ァイル の メイ ンプ ログ ラム 部 に 書か れ た 2 種類 の メッ セ 
ー ジ ( く > で 半 ま れ た 文学 列 ) が ,。 コン ソー ル に 表示 され て いま す . 

さて 決 に , 本 項 の 解説 で 。 最 も 重要 な り リスト と な る 当 サ ンプ ル ・ プ ログ ラム の PRN フ ァイル を 示し 
ます . “マクロ の 概念 を 。 この PRN リス ト か ら 理 解す る こと が で きる で し ょ う ). 

ソー ス ・ フ ァイル で ある Figure-3.1.1 の リス ト と , 次 の PRN フ ァイル の リス ト と を よく 対比 し て み 
て 下さ い . 定義 され た それ ぞ れ の マク ロ が , メイ ンプ ログ ラム で 使用 る きれ, それ が アセ ンプ ブル され 
る こと に より 。 どの よう に 展開 され ,。 オプ ジェ クト ・ コ ー ド に 変換 され る か に 注目 し て 下 ざ WI 

際 


A>TYPE SMPL1MAC。PRN / PRN フ ァイル に より 展開 され だ それ ぞ れ の マフ ロ 定 義 を 見 る こと が で きる . 


4441411111141441411114144144141141111611114114111111 
る ・】 MAC SAMPLE PRDGRAM 1 1 
STORED MACRO る ・】 
ボネ ネネ ネネ ネネ ネネ ネネ ネネ ネネ ネネ ネネ ネネ ネネ ネネ ネネ ネネ ネネ ネネ ネネ ネル ホネ ネネ ネネ ネネ 
oO10O ORG 1OQH 
3 くく くく くく < く < くく 。 MACRD DEFINITIDN >>>>>> ッ > ラッ 
ALLPUSH MACRO 
PUSH PSM | 
PUSH B 
PUSH D 
PUSH H 
ENDNM 
| 
ALLPOP MACRO 
_ POP H 
POP D | マク ロ 定 義 部 は , ソー ス ・ フ ァイル 
POP B | と 同じ . 
POP PSM | 
ENDM 
MSGOUT "MACRO MESS | 
LUCAL MESBUF 。MDUT 
JMP MDUT 
MESBUF』 DB ODH。OAH。' &MESS” 。 ODH。 OAH。" を 
MOUTs MVI C。9 
LXI D 。 MESBUF 
ド +* 記 号 は , マフ ロ に 2 
よっ て 展開 され だ コー 。 
ド で ある こと を 示す くく くく くく くく くく 。 MAIN PROUGRAM >>>>>>>>>> 「 
OO TALLPUSH] 展開 され た メイ ンプ ログ ラム 部 . 
O1O1+C5 PUGH B \ー ズ ・ ファ イル と よ ぐ 比較 し て 下さ い . 
Oo102+D5 PUSH D 
O10 さ +E5 PUGH は 
MSGQ <*** THIG 15 MAC SAMPLE PRDGRAM 2 ***> 
O104+C さ さ OO 1 JMP っ っ OOO2 
O107+ODOA2A2A2A??OOO1 』 DB ODH, OAH。" まま THIS TS MQC SAMPLE PRDGRAM 2 %**?。ODH。OAH。" 
O1 る O+OEO9 っ っ 0002』 MVI じ 。 ウ | 
O1 さ 2+1 107O1 LXI D 。 2?OOO1 
Q135+CDOSOO CALL OOO5H 
[ALLPOP] 
O13B+E 1 POPD 1H 
O1 さ 39+D1 POP D 
O1 さ A+ ビ 1 POP B 
O1 さ B+F 1 POP PSM 


MAC こ (Z)SID の 使用 例 と マク ロ ・ ラ イブ ラリ の 利用 法 


[MSGOUT <ENb>] 
O1 さ C+ じ る 4 プロ 1 MP うつ OOO4 
Q1 さ F+ODOA454E44 つ つ OQOO さ 』 DB ODH 。 OAH。 "END” >ODH。OQAH。" 
O0147+OEO う 220OO04 』。 MVI を 
QO149+1 1 ミ FO1 LXI D。 2O00O さ 
914C+CDOSOO CALL OOO5H 
O14F C 
O15O ーー ここ は マク フロ で は な い END 


の で ~+“ 記 号 が な い 、. 
人 Q > 


Figure-3.1.5 サン プル ・ プ ログ ラム の PRN フ ァイル の リス ト . マク ロ の 概念 を 知る 上 で 最 重 要 . 


この サン ブル ・ ブ ログ ラム は , マク ロ 定 義 と その 使用 (マク ロ ・ コ ー ル と 言う ) の 最も 単純 な 例 で 
あり , 本 米 は , も っ と 高度 な 定義 法 や 使用 法 が あり ます . 

いずれ に し て も , よく 使わ れる よう な ルー チン を マク ロ で 定義 し て お け ば 。 侯 う 時 に ,。 マク ロ 名 。 
ある い は マク ロ 名 と 必要 な パラメータ を 記述 する だ け で 良い の で す . あと は MAC ア セン ブラ が 自動 的 
に Figure-3.1.5 の よう に 展開 し て くれ ます . パラ メー タ を 変え て , 同じ ルー チン を 呼ぶ こと が で きる 
点 が , 普通 の サブ ルー チン と 大 きく 異なり ます . 


マク ロ ・ ラ イブ ラリ の 利用 と その 使用 例 


購入 し た MAC の ディ スケ ッ ト に は , 本 体 の MAC . COM′ の 他 に , 多く の マク ロ ・ ラ イブ ラリ が 
含ま れ て いま す . その 内 容 を 記し た ファ イル ,。.\DISK . DOC を タイ プア ウト し て 次 に 示し ます の で 
参考 に し て 下さ い . 


/ ary DISK。 DOC) MAC" の ディ スケ ッ ト に 含ま れる 各種 フタ ァイル に つい て の 説明 文 の タイ プア ウト . 


Fi1es COnte ロ 人 5 
| MAC. COUN "MAC" Ma と CFO 555 ら emD 1 
SAMPLE . ASN Samp1e DroOgram もそ O test MQC execution 
TBO8B5.LIE 1 mD1G ma と CFO5 for BOB5 RIM/GIM 1n ロ struCtioOn 多 
Z8O.LIB MacrO 1irary for ZBO operation codes 
ZBO. DQ ロ C DoOcumentation for the ZBO。LIB fi1e 
INTER。LIB Traf 季 ュ ミ に 11 ロ ht 1 ロト e し 5@CtiOn 1ibrary (see manua1 ) 
TREADLE5S.LIB L1DFaFy OO ヒ 上 上 a イ fiC tread1 es 
RUTTUNS.LIB L1DFaFy ffOr pedesst 上 Fian pushbuttons 
SIMFIO.LIB Simple BDOS 1I/ ロ Library 
SEQIO.LIB Se ロ uentia1 fi1e 1T/ ロ 11bra レ y 
STACK。.LIB SG1mD1 与 stack machine 11ibrary 
DSTACK。LIB COmD1et ら stack machine 11Drary 
CNPARE.LIB し 1DFary Or 551mD1G 日 bt COompari On 〇 OD ら ati On 
NCOUMPARE . LiB 日 bt comparison5s wi モ h negation 
| MHEN.LIB ト MacFO5= fOr 上 he HEN と On5 モ ヒ ぃ こと 上 (see manua1 ) 
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DOMHILE。LIB Macros for the DOMHILE こと On も ts モビ u ヒ も | 


SELECT .LIB Macros for the SELEET と onstruct | 
Figure-3.1.6 "MAC” の ディ スケ ッ ト に 含ま れる 各種 ファ イル の 説明 文 の タイ プア ウト . 


これ ら の ライ ブラ リ を 利用 する こと に より , 8080, 8085, 280 の いずれ を も アセ ン ブ ル す る こと が 可 
能 と な り ま す が , まず , これ ら の マク ロ ・ ラ イブ ラリ の 中 か ら , シー ケン シャ ル ・ フ ァイル 1/O ラ 
クウ 人 CON も B" を 親 用 て で て 。 サ ンプ ル ・ ブ プロ グラ と を 人 重 っ て か 示し ょ う 。 

CPZM の ビル トイ ン ・ コ マン ド の “TYPE” と 同等 の プロ グラ ム を 作っ て み ま し ょ う . も し , マク 
ロ ・ ラ イブ ラリ を 利用 せ ず に , この プロ グラ ム を 実現 する に は , 2. 2 童 の シス テム ・ コ ー ル の ファ ン 
クシ ジョ ン :15, 20 項 で 実習 し た プロ グラ ム を 骨子 と すれ ば 良い で し ょ うう. 

し か し , この プロ グラ ム に マク ロ ・ ラ イブ ラリ を 利用 し た 場合 , どの よう な 威力 を 発揮 する か , ま 
ず そ の 実例 を 示し ます . 

SSGOHO  LIB* マク ロ ・ ラ イプ ラ ひ を 利用 し た , アス 年 ゞ プア 在 小 の カネ プア ウド ャ ズ 只 グラム 
に た グラム 名 まま 生還 HUT/) の ソー ス ・ リ スト を 赦し ます 、 


A>TYPE TYPEQUT 。ASM)  「 マ クロ ・ ラ イブ ラリ の 利用 , サン プル ・ プ ログ ラム の ソー ズ ・ ファ イル を ジイ ブン ジワ ウト . 半 


491191931《 す 19399《$⑥$《99 も 3619《3933339《13983399933333 る 391 


*# MAC SAMPLE PRDGRAM 2 4 1 
る ASCI 1 FILE TYPEOUT し を 
ボネ ルネ ネネ ネネ ネネ ネル ボキ ルネ ネネ ルネ ミオ ポ ネネ ポキ ポキ ネネ キネ ルル ネネ ポル ネネ ホネ ボネ 
QRG 10QH 
[MACLIB SEGIO] マクロ ・ ラ イブ ラリ “SEQIO. LIB" フ ァイル の 使用 を 宣言 . 
LXI SP。 STACK ロー カル ・ ス タッ フ ボ イン 設定 . 
FILE INF ILE 。 INPUTF ILE 。 。 1 。 。 1024| \FILE? マ フロ の 使用 . 1st FCB に ある ファ イル を オー プン 
NXTBLOCKs し 。 4024 バ イト の バッツ フ ァ に 読み 出せ る よう に 準備 する . | 
GET INPUTPILE] GET* マ クロ の 使用 . INPUTFILE*(1st FCB に ある ファ イル ) を 読み 出す . | 
J メ QOQQOOH | “ | 
CPi 1AH エン ド オ プ ブフ ァイル で あれ ば リプ ブー ト し て CP/M に 戻る . 
2 QooOOH 「 
- ヽ PUT* マ クロ の 便 用 .*CON*( コ ン ソ ー ル ) に 出力 する . 
JMP NXTBLDCK 
| D ら 5 さ 2 
| STACK EQU 事 
BUFFERSs ご これ 以 後 は 。1024 バ イト の ファ イル 読み 出し 時 の バッ ファ に 使用 . 
END 


Nm ジレ 


Figure-3.1.7 マク ロ ャ ライ プ ブラリ を 利用 し た 。 ダイ ププ アウト ・ プ ログ ラム の ソー ス ・ サ スト 。 


よー 


MAC と (Z)SID の 使用 例 と マグ クロ ・ ラ イブ ラリ の 利用 法 


この ソー ス ・ リ スト の よう に SEQIO マ クロ ・ ラ イブ ラリ の 中 か ら 。 "FILE/。 GET/。 PUT” の 3 
つ を マク ロ ・ コ ー ル する こと に より 。, 実に 簡素 に タイ プア ウト ・ プ ログ ラム を 実現 する ご と が で きま す . 
ここ で , "FILE′ マク ロ の パラ メー タ に つい て 説明 し て お きま し ょ う . 


ファ イル の ファ イル 名 . FCB に 従っ て いる . 


際 グラ の ファ イル | ァイル 名 . ここ で は 1| 番目 d 
適当 に 名 を 付け る . 


(マク ロ 名 ) je ァイル で ある か , Sgy 
ファ イル で ある か の 指定 
ドラ イブ 名 . ここ で は 
省略 し て FCB に 従っ て 
いる . 


に 60250 選 
ここ で は 省略 し て FCB に 従う . 


| Se 2 の | 


を 指定 する こと が で きる が , ここ 


旨 3 お バッ ファ ・ ア ドレ ス 
で は プロ グラ ム 中 で 指定 し て いる . 


バッ ファ ・ サ イズ の 
設定 . 
Figure-3.1.8 “FILE” マク ロ の パラ メー タ 


当 グ ログ 芝 ム で 用 いた FIEE" マ クロ の パラ メー タ は 。 この よう に 入力 ラテ ァイル と し で の 設定 を し 
まし た が , 例え ば も う 1 組 , アウ トブ プット ・ フ ァイル 用 の “FILE” の マク ロ ・ コ ー ル を 行い 。 プロ グ 
ラム 中 の まり] (ON ん PUT OMPHUTFIE と で も すれ ば この デ ロ グ ラム は 、 間 P ュ マツ 
ンド の ファ イル ・ コ ピー の プロ グラ ム に 相当 する も の に な る 訳 で す . 

挫 に 、 こ の ソー ス ・ フ ァイル を MAC で アセ ンプ ブル し , LOAD コ マン ド を 実行 し て , “TYPEOUT . 
COM" を 生成 し , 実行 し て み ま し ょ う . アセ ンプ ブラ の 実行 は 。 Figure-3.1.2 と 同様 な の で ここ て で 示す 
の は 省略 し ます . 

ライ ブフ ラリ ・ フ ァイル の “SEQIO . LIB” は , アセ ンプ ブラ が 実行 きれ る ドラ イブ と 同一 の ドラ イブ 
上 に な けれ ば な り ま せん の で アセ ンプ ブル 時 に は 注意 し て 下さ い . 

で き 上 っ た ブロ グラ ム の 実行 時 の コマ ンド は , 


TYPEOUT。,x : filename. ext / 
時 こし っ 。 イプ 名 で 。 ログ イイ ンー ディ スク の 場合 は 省略 で きま す 。 
次 に 実行 例 と し て , ド ライ ブ B: 上 の ファ イル “DUMP . ASM” を タイ プア ウト し た も の を 示し ます . 


- ド ライ プロ ・ 上 の ファ イル 。 *DUMP ASM* を タイ ファ ゥ ト 9 る . 


Piue purp PR READS AN INPUT FILE AND PRINTS IN HEX 


COPYRIGHT (C) 1975。 1976。 1972。 1978 
DIGITAL RESEARCH 

、。 BOX 5Z79。 PACIFIC GROVE 「 

、 CALIFORNTA。 9395o 。 


マク ロ ・ ア セン ブラ お よび リン ク ・ ロ ー ダ に よる ソノ フト 開発 


RG 10QH 
BD0S EQU OOO5SH 3 DOS ENTRY POINT 
COUNS EQU 1 3 READ COUNSOULE | 
すか も EQU ンコ 3 TYPFE FUNCT IOUN | 
PRINTF EQU し 。 3 BUFFER FRINT ENTRY 
BRKF EQU 1 1 3 BREAK KEY FUNCTIUN (TRUE IF CHAR READY) 
OFENF EQU 15 sFILE OUFEN 
READF EQ ロ U 20 5 READ FUNCTIUDN 
3 
FCB EQU ら じ ヒ H sFILE CONTROL ELOCk. ADDRESS 
BUFF EDU BOH 3 INPUT DISK BUFFER ADDRESS | 
5 
NON GRAPHIC CHARACTERS 
CR EQU ODH s CARRIABE RETURN 
に だ EQU OaH sLINE FEED 


N ファ イル の EOF を 検出 し だ 時 点 で ファ イル の 出力 を 終わ る . 
Figure-3.1.8 "マク ロ ・ ラ イブ ラリ を 利用 し て 作ら れ た タイ プア ウト ・ プ ブロ グラ ム の 実行 . 


次 に 当 プ ログ ラム で 利用 し た “FILE” マク ロ が 。 ファ イル 操作 上 の 各種 エラ ー 処 理 を 行う ルー チン 
を 含ん で いる こと を 実際 に 確認 し て み ま し ょ う . 


>TYPEDUT ABCD。XYZ7 ディ スク 上 に 存在 し な い フ ァイル の タイ プア ウト を 行う . AA 
NO MRUTFILE FILE ーー トッ ラー メ ツ セージ が 表示 され て CP/M に 戻 つた . 
人 > プロ プラ ム 中 で , 内 部 の ファ イル 名 と し て 指定 し た 名 前 で ある こと に 注目 


Figure-3.1.9 *FILE′ マク ロ の エラ ー 処 理 の 確認 . ファ イル が 見 つか ら な い 場 合 . 


この 他 に も , “DISK FULL′ と か , CANNOT CLOSE” とか, 各種 の エラ ー 処 理 を 勝手 に 行っ 
て くれ ます ., 「 

決 に , 当 プ ログ ラム の 中 で マク ロ ・ コ ー ル し た 部 分 は , 実際 に は どの よう に 展開 され て いる の か , 
8 拉 和 アテ ゴイ フレ を タイ プチ ウト し て 時 て み ま を ましょ) 


MAC こ (Z)SID の 使用 例 と マク ロ ・ 


ライ ブラ リ の 利用 法 


の 


A>TYPE TYPEOUT。PRN ) - アセン ブル に より 生成 され だ PRN フ ァイル の タイ プア ウト . 


O10O 


0100 さ 312502 


OOQ 1 += 
0103+C さ QFO1 
O106+7E 
O107 フ + ォ 12 
O10B+2 マ 
O1Q09+1 さ 
O1OA+OD 
O10B+C206Q1 
O1QOE+ ヒ ウ 
O1QOF+215COO 
O112+111DO1 
O1 15+OEOC 
O1 17+CDO6O 1 
O11QA+ じ る 4401 
O1 1D+ 
O11D+= 
O129+0O 


O1EF+CD47O1 


O1F2 CAQQOQGQ 
O1F5 FE1 ム 
Q1F7 CAQOOQOQ 


O1FA+F5 
O1FB+OEQO2 
Q1FD+5SF 
O1FE+CDQO5QOO 
O2O01+F 1 


OZO2 CSEFOQ1 


O2O05 
0 ご 25 = 


O225 


ポポ ルポ ネル ボネ ポキ ネ ボネ ネネ ネネ ポポ ネ ネネ ボネ ネネ ネネ ネネ ネル ネネ ネネ 


し る 1 MAC SAMPLE PROGRANM 2 も る 1 
る SCTIT FILE TYPEOUT し 
1 る る る る る 《《36《 す 9《《39$⑥ す る 《《$$$⑥1 す 1 も $⑥$《$⑥3961 す 391《 す 699$969691 

RG 100H 

MACLIB SEGQIO 

LXI SP , STACK 


JMP 
MV 
STAX 
INX 
INX 
DCR 
JNZ 
RET 
LXI H。 QTFCB+ (1 一 1 ) %16 
LX I D。FCBINPUTF ILE 
MVI C。3C 
CALL 2DEF 
JMP PrJeTeTe)-| 
DS @C 
FCBINFUTF ILE EQU 
DB O 


NXTBLOUCKs 


[SET  " 1NPUTFILE 
[CALL GETINPUTF1LE- 
JZ OQOOH りー 部 分 
CFP 1AH ン 
JZ OoQoH ン ノ 
PUT CON 
還 


MP NXTBLOCK 
DS さ 2 
STACE EQU 
BUFFERGs 
END 


ヽ 、 マン ロ ・ ア セン プラ の 実行 に より , マフ ロ ・ 


で 


フイ ブラリ“^SEOQIO. LIB” か ら 展 開 さ れ だ 


Figure-3.1.10 当 プ ログ ラム の “PRN” ファ イル の タイ プア ウト . マク ロ が 展開 され て いる 様子 が よく 


分 か る . 


1 ノコ 


マク グロ ・ ア セン ブラ お よび リン ク ・ ロ ー ダ に よる ソフ ト 開 発 


Z80 の アセ ンプ ブル 例 


MAC は , 付属 し て くる マク ロ ・ ラ イブ ラリ の “2Z80 . LIB” を 利用 し て , Z80 用 の ソー ス ・ フ ァイル 
を アセ ン ブ ル す る こと が で きま す 。 使用 きれ る ニー モニ ッ ク は , ザイ ログ 表記 で は な く , いわ ゆる \ イ 
ン テ ル 拡張 ニー モニ ッ ク ” と 呼ば れる も の で す . 

世の中 に は いろ いろ な 人 が いて , “ザイ ロク 表記 を 採用 し て いな いも の は , Z80 の アセ ン ブ ラ に あら 
ず ” と 思っ て いる 人 も いま す が , アセ ンプ ブラ は , その 総合 的 な 機能 と 環境 こそ 第 1 に 評価 され る べき 
で あり , その 手段 で ある ニー モニ ッ ク の 表現 法 の み に 目 を 奪わ れる の は どう か と 思い ます . 筆者 も , 
ザイ ロク 表記 法 の 方 が ロジ ッ ク 的 に は 分 か り 易 いと 思い ます が , どちら に し て も 最 重 要 な 問題 で は あ 
り ま せん . 

さて , MAC に よる Z80 の アセ ンプ ブル 例 を 示し ます . 

サン ブル ・ ブ ログ ラム と し て , IF-ELSE-ーENDIF の 条件 付き アセ ン ブ ル の 実習 も 立 ね て 。 1 つの 
ソー ス ・ フ ァイル で , 8080, Z80 の 両方 に 対応 で きる プロ グラ ム を 作っ て み ま し ょ う ). 今回 の プロ グラ 
ム は , メモ リ と CPU レジ スタ 間 の 操作 を , 8080 と Z80 の 双方 で , 同じ 内 容 の も の を 表記 し た も の で , 詳 
し さく は サス ズ スト を ご 芋 下 きい 。 

その ソー ス ・ リ スト (ブロ グラ ム 名 は “8080Z80”) を 次 に 示し ます ., 


A>TYPE_BO8OZ8O。ASM) 条件 付き アセ ン ブ ル に よる , 8080/Z80 両 用 プロ グラ ム 例 の ソー ス ・ フ ァイル の 0 
シン イブ だ の た . 
「 す 111111111 す 11111131117111111114111111171111111111」 
1 MAC SAMPLE PRDGRANM さ 1 
6] BOBO & 7-BO USE 1 
1111 す 11111 す 131111111111 す 137111111111 す 11111111177311 
PAGE ”” SO - PRN リ スト を , 1 ベー ジ 50 行 に 設定 . マイ トル や が が が な れる , 
QRG 10oH 
MACLIB 28O 280 マフ ロ ・ ラ イブ ラリ の 使用 を 宣言 . この ライ ブラ リ を 使わ な けれ ば , Z80 の アセ ン 
プル は で き な い . 
TRUE EQU QFFFFH 
FALSE EQU NDT TRUE 
zo EQU TRUE 2Z80 用 に アセ ンプ ブル す る だ め , こち ら を 真 と する . 
1BoBO EQU NOT ZBO 反対 に 偶 と な る . 
MVI B。OO 


SETB 


7。B BB レジ スタ の bit/ を 1 に する .〈(Z80 用 ニニ モッ) 


[ELSE] 

PUSH PSM | 

MVI A。 1000$OOGOB 

DRA B : 280 で の `SETB7, B* と 同じ こと を , 8080 で 実現 し た も の . 
NOV B。A | 


1 


POP PSM 


TITLE "ーー- BOBO-ZBQ SAMPLE PROSRAM ---*" ILE 宣 言 に より , PRN フ スト に 
| 
[ENDF] 


1 ノ オ 4 


MAC と (Z) SID の 使用 例 と マク ロ ・ ラ イブ ラリ の 利用 法 


B レ ジス タダ に 00 を ロー ドレ し だ 後 , bit7 を 1 に し て , アド レス 4004H に スト ア . 


LXr H。 4004H し 人 の レジ スタ は 変化 誠 し 
MV NM 。B 。 
まま 


LHLD QOO1H 
LDED OOO6H アド レス 0006H. 0007H の 内 容 を D., E レ ジス タ に ロー ド す る . 280 用 ニー モニ ッ フ ) 


LHLD OOO6H | 


XCHG , 280 で の 上 記 2 ステ ッ プ と 同じ こと を , 8080 で 実現 し た もの. 
LHLD QQO1H 


[END IF] 


SHLD 49o1H 
SDED ” 4O0O6H  D. E レ ジス タ の 内 容 を 。 アド レス 4006H, 4007HN に スト ア す る . CZ80 用 ニー モニ ッ ク ) 


SHLD 4001H 
XCHG 「 Z80 で の 上 記 2 ステ ッ プ と 同じ こと を , 8080 で 実現 し た も の . 
SHLD 40oO6H 


IENDIF (レス 0001H 0002H の 内 容 を , 4001HL 4002H へ 。 ア ドレ ス 0006H.、 
ー 條 (0007H の きき を 4006B6:4007H へ コピ ビー する 


LX1 H。 さ QOOH 


LX Ii D。 4OBOH 
LV B。 1 2 日 
CALL BLKMOVE 
RET 


H ^ く くく く BLOCK MOVE SUB RUTINE >>>>> 
BLKNHVE 


LDIR HL レジ スタ で アド レス され る メモ リ 内 容 を , B。C レ ジス マツ で 示さ れる バイ ト 数 だ け , 
RET D, E レ ンジ スタ で アド レス され る メモ リガ ら 順 に プロ ツク 転送 する 〈Z80 用 ニー モッ ク ). 


MOV A,B 
ORA に 
RZ 
ob に [ 280 で の 上 記 2 ステ ッ プ と 同じ こと を , 8080 で 実現 し だ も の . 
M 
INX H! INX D 
DCX B つ ーー 1 
アド レス 3000H か ら 128 パ イト の デー タ を , アド レス 4080H か ら の 
JPP BLKMOVE | 128 バイ に に プロ ッ フ 転送 する . 
1 
END 
A> 
Figure-3.1.11 Z80 の アセ ンプ ブル 例 の ソー ス ・ リ スト . 


1 フ ら 


マク ロ ・ ア セン ブラ お よび リン ク ・ ロ ー ダ に よる ソノ ト 開 発 


プリ ンダ 用 婚 に タイ プア ウト され だ PRN リ スト , 1 ペー ジ 50 和 は に ビフォー マツ ト さ れ て いる . PRN リ スト 2 ペー ジ 目 
5 Pe 
リ 


チ 
CFP/M MACROD ASSEM 2.0 幕 OO1 ーーー BOBO-ZBO SAMPLE PRODBRANM ーー タイ トル と ペー ジ No が 付 ぐ . CFP/M MACRD ASSEN 2.O OO2 ーーー BOBO-ZBO SnAMPLE PROGRANM ーー 一 
11311314411131111111 ま 1111111331133333 す 33 は 11114 は 3 は 1. 
ます 】 MAC SAMPLE PROSRAM さ ! 
ま BOBO を USE 
TUES も 3311112111111131111113131311333141113331333 は 1 


O1 12+ED5 さ OEDH, 5S さ H = 一 同じ く SDED の コー ドガ が 代入 され て いる . 
4006H 


TiTLE *ーーー BOBO-ZBO SAMPLE "PRDBRAM ーーー* =- アセン プル さ れ て いな い 
SO - 


PAGE 


ORG 1QOH 
MACLIB  Z8O 


BLOCK MOVE SUB RODUTINE 
Z8O 


zo 
7。B 語 ン レー ョ | 守 C QEDH。OBOH 阿 じ く LDIR の コー ドガ 代入 され て いる . 
oCBH。7wB+BtoCoh イブ て の らち, SETB の Z60 の コー ドガ 


PB 5 
R。 1OOO ま OOOOB | 
BE ー アセ ンプ ル さ れ て いな い . 
|sTax D 1 ァ セ ン ブ ル さ きれ て いな い . 
INX H! IJNX D 

DCX B | 

av gukovel 

ENDiF 


END 


じ ぐ LDED の コー ドガ 代入 され て いる , 


Figure-3.1.12 プリ ンタ 用 紙 に タイ デア ウト され た サン プル ・ ブ プロ グラ の PRKN サ スト . 


上 記 の ソー ス ・ フ ァイル を Figure-3.1.2 に 示し た の と 同様 に , MAC で アセ ン ブ ル し ます . 

次 に , アセ ンプ ブル に より 生成 され た PRN フ ァイル を プリ ンタ に タイ プア ウト し て , その サス を 示 
し ます . *PAGE 50” の 指定 に より , 1 ペー ジ 50 行 に リス ト ・ フ ォ ー マ ッ ト さ れ て いま す . 

上 記 の PRN リス ト か ら , 条件 付き アセ ン ブ ル が , どの よう に 実行 され て いる か が 分 か り ま す . Z80 が 
真 . 8080 を 偽 と し て アセ ン ブ ル し た た め , 8080 用 の 部 分 が 無視 され て いま す . 

アセ ン ブ ル さ れ て いる 側 の , 8080 の ニー モニ ッ ク に は な い Z80 ニ ー モ ニッ ク の 部 分 は , “280 . LIB" 
マク ロ ・ ラ イブ ラリ か ら Z80 の オプ ジェ クト ・ コ ー ド が 与え られ て いま す . 

次 に 。 当 項 の 主旨 で は あり ませ ん が , この サン プル ・ プ ログ ラム を 実行 し て み ま し ょ う ). 先程 の ア 
セン ブル に より HEX フ ァイル も 生成 され て いま す の で , LOAD コ マン ド を 実行 し て , “8080Z80 . COM 
ファ イル を 作り ます . ( 

で は , 実行 前 準備 と プロ グラ ム の 実行 、 それ に 結果 の 確認 を し た 実行 例 を 次 に 示し ます . 


DDT VERGS 2.2 

ーF さ OOO。 さ 10O。55 ) アド レス 3000Hー3100H に *55" を フィ ル . 
ーF 4OOO。 SOOO。 OO /) アド レス 4000H て 5000H を 0 フリ ア . あと で 確認 し 易い よう に . 
ー^C - DDT を 終わ る . 


> 


MAC こ (Z) SID の 使用 倒 と マグロ ・ ラ イブ ラリ の 利用 法 


>BO8OZBO) サン プル ・ プ ログ ラム の 実行 . 

A> 

A>DDT)  -DDT を 起動 . 
DDT VERS 2.2 それ ぞ れ 書き 込ま れ た デー ツ . 


D4QQO。 4OOF / 
4OOO OO [G マ Dal oo QQ 090 00 QO 90 OO 00 00 00 .。。 し .。。2.。。、。。、- 
ー-D407O 410F/ 「 | ー 
4070 00 OO 90 OO 00 O0 CO 00 OO の 0 0O OO OO 00 OO 00 。。。。...。、。.。、。。- 
40BOISS S5 SS 55 55 55 55 55 55 55 55 5S5 55 55 55 55 UUUUUUUUUUUUUUUU 
- 409O 55 55 55 55 55 55 55 55 S5 5S 55 5S 55 55 5S 55 UUUUUUUUUUUUUUUU 
4OQQO IS5 55 55 55 55 55 55 5S 5S5 55 55 5S5 5S 55 35 55S UUUUUUUUUUUUUUUU | 
4O0BO |55 55 55 SS S5 5S SS 55 55 55 55 55 55 55 5S5 55 UUUUUUUUUUUUUUUU | 
40CO 155 55 55 55 55 SS 55 SS SS 55 55 55 SS5 55 55 55 UUUUUUUUUUUUUUUU 
4ODO SS 55 55 55 55 SS 55 55 55 55 55 55 55 55 55 55 UUUUUUUUUUUUUUUU 
40EOISS SS SS5 SS 55 SS 55 55 55 55 55 55 55 55 55 55 UUUUUUUUUUUUUUUU 
40FO [SS5 55 55 55 55 55 55 55 5S SS 55 55 5S5 55 55 55 UUUUUUUUUU UUUUU 


41OO QO OO OO oo oo oo oo oo oo oo o 0 00 00 00 0O 00 。、,。。。:。。.。.、。。- 


ー^ ヒ プロ ッ ク 転 送 さ れ だ 128 パ イト の デー タ . 人 
A> 1 


Figure-3.1.13 サン プル ・ プ ログ ラム の 実行 前 の 準備 と 実行 ,。 それ に 結果 の 確認 . 


次 に , 参考 まで に , Figure-3.1.11 の 当 プ ログ ラム の ソー ス ・ リ スト の \Z80 TRUE の 部 分 を . 
"2Z80 FALSE” と 逆 に 書き 直し て , 再 ア セン ブル する と どう な る で し ょ う . 
その アセ ンプ ブル 後 の PRN リ スト を 次 に 示し ます . 


CP/N MACRD ASSEM 2。 幸 OO1 ーーー BOBO-ZBO_ SANPLE PRUGRANM ーーー 


すま も ああ め お もめ あ すす 本 本 本 本 本 本 本 本 本 本 本 本 本 本 本 本 本 本 本 

Ge PROGRANM M CPZ MACRD ASSEN っ OO2 ーーー 8O8O-Z8Q ニー ニニ 
me 。 0 0 Z-BO USE 2-o Oo2 BOBO-ZBO SAMPLE PROGRAN 
EIDTTTITTT111 rme THTUTTITTEITTUTTTILTT: 4 9 
ot17 22o64O G 
TITLE "ーー- BOBO-ZBO SAMPLE PRDGRAM ーー-* 芝 4006H 
PAGE So 


O11A 2100 さ 3O H。 さ OOOH 


1ooH 91 1p 11go4o X D, 4OBoH 
180y 


ORG 
MQCLIB  Z8O し X B。 128 
0 CD 7O 1 BLKIOVE 
O126 C9 
NODT TRUE 
FALSE き くく くく < BLOCK MOVE SUB ROUTINE >>> 
NOT Z8O BLKMOVE : 

IF 


H! INX D 


O12F C32 7O1 JNI BLKIOVE 
F 


O1 さ 2 


Figure-3.1.14 先程 の も の と 条件 を 逆 に し た 場合 の アセ モン ブル 結 果 . 


マク ロ ・ ア セン ブラ お よび リン ク ・ ロ ー ダ に よる ソフ トド 開発 


この よう に 今回 は 。 8080 用 の 部 分 が アセ ンプ ブル さ れ て , Z80 用 の 部 分 が 無視 され て いま す . 
ここ で も 同じ く ,。 LOAD コ マン ド で “8080Z80 . COM” ファ イル を 作り 実行 すれ ば , 今度 は 8080 の 
オブ ジェ クト ・ コ ー ド に より , Figure-3.1.13 と 同一 の 結果 が 得 ら ちら れ ま す . 


AzTYFE 28O.L1B) し ハ 


s SCHE MACRD USED FOR CHECEEINGB 日 BIT DISFLACNMENTS 
5 
ゅ る じ HK MACRO “DD ss USED FOR CHECEING RANGE DF 日 -BIT DI1ISF.S 
IF (?DD GT 7FH) AND (?DD LT OFFBOH) 
*DISPLACEMENT RANGE ERROR - Z8BQO LIE" 
ENDIF 
| ENDNM 
| LDX MACRO ?2R 。 PD 
SCHK ?D 
DB QODDH。 SR*B+46H。 PD 
ENDNM 
LDY MACRO ?R 。 で D 
9CHK ?D 
DB QFDH。 で RB+46H。 で D 
ENDN 
) 
LDI MACRO 
DBE QEDH 。 QAOH 
ENDM 
LDIR MACRO0 
DB QOEDH。 OBOH 
ENDN 
LDD MACRO0 


DB QOEDH。 QABH 
む ENDN 


Figure-3.1.14-a マク ロ ・ ラ イブ ラリ は , ユー ザー が 独自 に 変更 し た り , 独自 に 開発 し た プロ グラ ム を 新 
し い ラ イプ ラリ ・ フ ァイル と し た り , 自由 に , 使い 易い よう に する こと が で きま す . 参 
考 ま で に 。 "2Z80. LIB”" マク ロ 記 座 叶 プ ラリ を タイ プア ウト し て 示し て お きま す ., 
*LDIR′ は , Figure-3.1.11 に 使わ れ て いま す の で 注目 し て 下さ い . 


3.1.3 シン ボル ・ テ ー ブ ル に つい て 


MAC に よる アセ ン ブ ル の 結果 , シン ボル ・ テ ー ブ ル の ファ イル が 生成 され ます . この ファ イル は , 
後述 の SID (シン ボリ ッ ク ・ イ ンス トラ クシ ョ ン ・ デ バッ ガ ) や ZSID の シン ボル 入力 用 と し て も 使わ 
悲 ます 。 

ここ で 。 2. 3 章 の “電子 早見 帳 *” の ソー ス ・ フ ァイル を MAC で アセ ンプ ブル し , 生成 され た シン ボ 
ル ・ テ ー ブ ル を 示し ます . 


MAC こ と (Z) SID の 使用 例 と マフ ロ ・ ラ イブ ラリ の 利用 法 


A>HAC _RNDFILE / 電子 早見 帳 ? の ソー ス ・ フ ァイル の アセ ンプ ブル. 


CF/M MACRO ASSEM 2.0 
O4 さ 4 

OO4H USE FACTOR 

END OF ASSENMELY 


A>DIR _RNDFILE。* ) アセンブル の 終了 後 , 生成 され た 名 フ ァイル の 確認 . 


Qz RNDFILE ASM RNDFILE FRN 』 RNDFILE HEX 』 RNDFILE SYM 
ソー スズ ス ・ フ ァイル 800200 疫 0 へ 


向 > 


Figure-3.1.15 2.3 章 の 電子 早見 帳 "” の ソー ス ・ フ ァイル を MAC で アセ ン ブ ル す る . 


上 記 の アセ ンプ ブル で 生成 され た シン ボル ・ ブー プル を オプ チ テウ トト て た に じ 汰 し まず 
各 シ ン ボ ル は , ABC 順 に ソー ト さ れ て いま す . Figure-2.3.5 の PRN リス ト の 各 ア ドレ ス と 比較 し て 
みて 下さ い . 


>TYPE_RNDFILE.SYM ) 生成 され た シン ボル ・ テ ー ブ プル の マイ プア ウト . さ 
.FIOuFe - 2.3.5 の P FR N リス ト の 難 ア ドレ ス を 参照. 

QOQOS BDOS 02 ブ 9 CLOSE O1OQ CMDSEL O2C さ CONIN QOSCBE CONOUT 
OOQOD CR QO172 DATAIN Q1B1 DATAIN1 O1EE DATAODUT OOBO_DNMAO 
OSB4 DNMA1 O1CS DSEARCH Q27O ERROR o1Fg EXIT QOSC FCB 
OQO7D FCBRO OSBD FLNEEDCLS QOSBC FLDPEN 0159 INSLNMAF Q26O JUST 
O1AO_ KEYIN QOOQA LF 0O14 く MQPMT Q3B7 MSGCRLF OSS2 MSGDATIN 
O さ 1E MSGERR QO さ 2A MSGIDXIN Q2BD MSGOUT O2D4 MSGSEL Q さ 66 MSGSRCH 
O12F NEMFTILE 026D NOTFIND QO2SQO NXTIDX O21A UPNHMFRD Q39O_PMRECO 
O392 PMRECC O3BE PTIDAD O02 人 る RNDREAD O2BO RNDMR ITE O1B9 RNDMT 

| O24C SEARCH 0296 SEQOMRITE 0287 SETRNDRCO _ O1CF SRCHIN O さ SB4 STACK 


人 > 


に 


Figure-3.1.16 生成 され た シン ボル ・ テ ー ブ ル の タイ プア ウト . 


9.1.4 SID, ZSID の 使用 例 


デジ タル リサ ー チ 社 で は , DDT よ りさ ら に 強力 な シン ボリ ッ ク ・ イ ンス トラ クシ ョ ン ・ デ バッ ガ の 
"SID"。 お よび , Z80 用 の SID で ある “ZSID” を 用 意 し て いま す . 
ここ で , ZSID を 起動 し て , 先程 の Figure-3.1.14-15 の MAC に よる アセ ンプ ブル で 生成 され た 電子 早 
見 帳 の “RNDFILE" プロ グラ ム の HEX オ プ ジ ェ クト ・ フ ァイル “RNDFILE . HEX′ を ロー ド し . 
か つ シ ン ボ ル ・ テ ー ブ ル も 入力 し て , シン ボリ ッ ク に デバ ッ グ を 行う こと を 想定 し て , 2 - 3 の コマ 
ンド を 身 有 し て み ま し ょ う ) う . 


1 プロ 


マク ロ ・ ア セン ブラ お よび リン ク ・ ロ ー ダ に よる ソフ トド 開発 


SID, ZSID は , DDT の コマ ンド と アッ パー コン パチ ブル で す の で , も ちろ ん DDT と 同様 な コマ ンド 
の 使い 方 が で きま す が 。 ここ で は , シン ボル に よる コマ ンド 入力 の み を 2-~ 3 行っ て み ま す . Figure 
-2.3.5 の “RNDEFILE′” の リス ト と , Figure-3.1.16 の シン ボル ・ テ チー ブル の リス ト と よく 比較 し て トト 
さい 、. 


人 2SID を 起動 バ #/ ガ ZSID の プロ ンプ ト で ある . 


ZSID VERS 1.4 

菩 IRNDFILE.HEX RNDF ILE . SYMN 』 
幕 R / R コ マン ド で メモ リ に 読み 込む . | 
| SYMBOLS - シン ボル ・ テ ー ブ ル が 読み 込ま れ だ こと を 示す メッ セー ジ . | 
| NEXT PC END | 
QOS ヨ BC O1OO BB6F 


pe ーーーーー 


SA 


| コマ ンド で , ヾ RNDFILE“ の HEX と SYM ファ イル を FCB に 入力 . 


寿し 10O / し コマ ンド で 100H か ら 着 アセ ン ブ ル . 
Q1OQO  LD  SP、.OS さ B4 .DMA1 
Q10O さ XOR A 
O104  LD (0Q3BC .FLOPEN) , QA 
Q10O7  LD (03BD .FLNEEDCL5) 。^ 


CNDSELs = ラベ ル が 表示 され る . 


010A LD DE 。O2D4 .MSGSEL 印 に 注目 . ーー。 
O1OD CALL O2BD 。MSBOUT _ 表示 され だ アド レス が , シン ボル の アド レス に 当 だ つて いれ ば, 
O11O CALL QO2C さ .CONIN その シン ボル 名 を 表示 し て いる . 
0D11 ス PP 85 2 
O115 JP Z。O1CS .DSEARCH 
O11 昌 CFP 49 
Q11A JP Z。Q172 .DATAIN 
埋 し 。CDNIN ) し コマ ンド で シン ポル CONIN" ガ ら 逆 アセ ンプ ブル 開 始 . 
COUNINs 
O2C さ FUSH HL 
Q2C4 LD C。O1 
Q2C6 CALL QQOOS 。.BDO5 
QO2C9 POP HL 
Q2CA RET 
CUNOUT 
Q2CB PUSH HL 
OZEE に D む 。 02 
O2CE LD  E。A 
| Q2CF CALL OOQOS 。.BDOS 
02D2 POP HL 
QO2D さ RET 
幕 D.DATAIN。 . DSEARCH ) -D わ コマ ンド . シン ボル “DATAIN" ガ ら ^DSEARCH" ま で を ダン プ . 
O172』 さ A BC 03 3C CA 日 1 O1 CD 1A QO2 さ 3E FF 32 8BD 
き 香 し く IL 等 等 凌 等 筐 > 2 人 
O1 ヨ Os O さ ミ SE FF CD 4C QO2 さ C CA QaQ QO1 11 2 Q さ CD BD Q2 
で > 尊 得 し に く 音 し 等 宮 栗 等 人 待 
O19O』 CD CS QO2 2A BE Q ミ 77 1i1 52 0O く 3 CD BD 0O2 21 B4 QOS 
1 和 韓 筐 1 笠 待 1 に 筆 R ド R 聞 等 待 琴 ! 3 本 
O1AOs CD C さ 0O2 77 2 さ FE 1 CA B9 O1 FE QD C2 aAQO 0O1 さ E 
琴 待 音 1 部 ち 凌 等 し 1 理 等 人 生 > 
O01BO。 OA 7 フ Z CD CB 02 23 C さ る A0 01 2A 92 OS 22 7D Q0O に D 
球 MM LI 等 1 幸 筐 環 まだ 1 等 に 2 } どら 1 
O1CO』 BQO Q2 CS QA QO1 さ 2 
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RMAC の 使用 例 


Figure-3.1.17 ZSID の 使用 例 .、 シン ボル に よる コマ ンド 入力 の 例 . 


この よ ょ うに , DDT で は 絶対 番地 で アド レス の 指定 を 行っ て いた も の が , SID, ZSID で は *. symbol/ 
と 村 く と も に より ま ミ シン ボ ポル 名 に よ ち て うま よ て の ゴ 富 の ア ドレ ス 指 定 が で きま す . も ちろ ん 絶 
対 番 地 で 行っ て も か まい ませ ん . 


3.2 RMAC の 使用 例 


9.2.1 RMAC の 機能 


RMAC(Relocating Macro Assembler) は , 前 項 で 紹介 し た MAC に , リロ ケー タブ ル な オブ ジェ 
クト ・ コ ー ド を 発生 する 機能 を 加え た も の で , 次 項 で 解説 する MACRO-80′ と ほとん ど 同 機能 
持っ て お り , モジ ュー ル 別 の 開発 や 各種 コン パイ ラ か ら 。 リ ロケ ー タ ブル ・ オ プ ジ ェ クト と の リン ク 

(後述 ) な ど が 可能 と な る アセ ンプ ブラ で す . リロ ケー タブ ル ・ オ ブ ジ ェクト の 形式 は , 決 項 で 紹介 す 
る MACRO-80” と 同一 で あり , 互い に 互換 性 が あり ます . 


3.2.2 RMAC の 使い 方 実例 


RMAC に よっ て 可能 と な る , モジ ュー ル 別 マシ ン 語 開発 法 (1 つの プロ グラ ム を , いく つか の モジ 
ュー ル 【 部 分 」 に 分 け , それ ぞ れ の モジ ュー ル 単 位 で 責任 を 持っ て 開発 し , 全部 の モジ ュー ル の 開発 
が 終わ っ た 時 点 で . それ ん ぞ れ を リン ク 【 結 合 〕] し て 1 本 の プロ グラ ム と する 開発 法 ) の 紹介 は 。 次 項 
の “MACRO-80′ の 項 で 行い ます の で , その 解説 は ここ で は 省略 し ます (MACRO-80 と ほとん ど 同 
じ 機能 な の で ). 

RMAC の 実行 例 と し て は , 次 項 の ^ モ ジュ ー ル 別 マ シン 語 開発 法 ′ で 実習 する モジ ュー ル の 1 つ を , 
この RMAC を 使っ て アセ ン ブ ル し , 他 の モジ ュー ル は 。 次 項 で 行っ た まま (MACRO-80 で アセ ンプ ブル 
し た も の ) の も の を 使い , 全体 を リン ク し て プロ グラ ム を 完成 させ て み ま し ょ う . 

た だ し , これ ら の 解説 は , 次 の 「MACRO-80」 の 項 を 先 に 読ま な けれ ば 理解 し に くい の で , まず は 
次 項 に ジャ ンプ し て , それ か ら こ こ に 帰っ て 来 て 下さ い . 
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マク ロ ・ ア セン ブラ お よび リン ク ・ ロ ー ゲ に よる ソフ ト 開 発 


次 項 , 3 . 3 章 で の 実習 プロ グラ ム で 使用 し た 3 つの モジ ュー ル の 内 , 最後 の モジ ュー ル ~MODUL2" 
を RMAC を 使っ て アセ ンプ ブ ルレ し, 次 項 と 同様 に リン ク を 行い 、 RMAC と MACR-80 に より 生成 され る 
リロ ケー タブ ル ・ オ ブ ジ ェクト が , 同一 形式 で あり , 互換 性 が ある こと を 確認 し て み ま し ょ う . 

RMAC に よっ て アセ ン ブ ル さ れる ソー ス ・ フ ァイル は , その ファ イル 名 の エク ステ ンション が MAC 
と 同じ く “ASM” で な けれ ば な り ま せん (MACRO-80 で は “MAC"). 

よっ て , まず 最後 の モジ ュー ル の ソー ス ・ フ ァイル 名 MODUL2 . MAC” を , “MODULX . ASM7 
と で も リネ ー ム し て お いて 下さ い 、 他 の モジ ュー ル は その まま の 状態 に し て お きま す . 

アセ ンプ ブル の 実行 で は , "MODULX 、 ASM^” を “RMAC に より アセ ンプ ブル し ます . この モジ ュー 
ル は , メッ セー ジ 用 の 文字 列 フ ァイル な の で , 8080, Z80 に は 関係 な く , 280 の ライ ブラ リ を 使用 する 
必要 は あり ませ ん . 「 


アセ ンプ ブラ の 実行 例 を 次 に 示し ます . 


2 


Figure-3.2.1 RMAC に よる アセ ンプ ブル 実行 例 . 


ア ャ セン ブル が 無事 に 終了 し て いま す . ア セン ブル に より , どの よう な ファ イル が 生成 され た か を DIR 
に 革 り 次 に 示し ます 、 


Figure-3.2.2 RMAC に より 生成 され た 各種 ファ イル の 確認 . 


182 


RMAC の 使用 倒 


生成 され た ファ イル に は , MAC で 生成 され る "HEX” フ ァイル は な く ,。 代わ り に REL′ と *SYM^ 
の 面 ファ イル が 生成 され て いま す . “REL′ は リロ ケー タブ ル ・ オ プ ブ ジ ェクト ,。 SYM” は シン ボル ・ 
テー ブル の 意味 で す . 

傘 に ,。 シン ルッ チー ズル の MOBULX . SYM" を ァ ヶ イ プア ウト で 決 に 基 ます. 


AA>TYPE OODULX、SYMN ) シン ボル ・ テ ー ブ ル の リリ ストア ウト 、. 


OOQD CR OOQOA LF OO さ 7 MSGAFT QOOO_ MSGINF 0O1F MSGBNMNG 


OOS5O MSBNIT 


Figure-3.2.3 RMAC に より 生成 され た シン ボル ・ テ ー ブ プル. 


人 > 


それ ぞ れ の シン ボル の 相対 アド レス は , 次 に 示す "MODULX . PRN^ リス ト 上 の も の と 同じ で す . 


FLUIELLTC MSGBINF'。 MSBRHNG 。 MSGBAFT 、 HISBNTIT 


OO 
ひい 生 


CR EQU QpDH 
LF EQU OoaH 


| 細 1 


QOOO0_ QODOn4BE4S5SO MSGINF'E DE に に し ビ 。、 KEY INPUT ( 内 / AA / 全う て うり 
GO1F _ QODGR4B4S4C MSBNMHNG: DE CR。LF。 HELLH GOOD _ MORNINGBT ER。LF 。「 *" 
0037 0DOR4B49SO_MSBRFT: DE CR。LF。 "HI ! BOOD RFTERNOON' CR。LF 。「 第 " 
OOSO OODOR474F4F_ MSGBNIT: DE じ R。LF。 BODOD NIGHT BYE こ EYE* 。CR。LF 


006 旭 END 


Figure-3.2.4 RMAC に より 生成 され た “MODULX . PRN” の リス ト ア ウト . 


PRN リス ト の ペー ジ 割 り は , MAC と 同様 ,。 "TITLE′ や PAGE/ の 指定 に より 行わ れ ま す . 
アセ ンプ ブル に 際 し て の 各種 ファ イル の 入力 先 や , 出力 先 . それ に 出力 リス ト の 形式 や 内 容 の 指定 な 
ど は , Figure-3.2.1 の コマ ンド ・ ラ イン の 後に , "アセ ンプ ブル ・ パ ラメ ー タ ? を 付け て 実行 する こと に 
ょ り , MAC と 同様 ,。 いろいろ な コン トロ ー ル を 行う こと が で きま す が , ここ で は 何 も 付け ず , 最も 基 
本 的 な を な アセンブル を 行い まし た . 


リン ク 
KMAC に よっ て 生成 され た, 最後 の モジ ュー ル の リロ ケー タブ ル ・ オ プシ ェクト ・ フ ァイル を 。 
項 の 実習 で すでに 生成 され て いる 他 の モジ ュー ル と リン ク し , 1 本 の プロ グラ ム に し まし ょ う . 
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マク ロ ・ ア セン ブラ お よび リン ク ・ ロ ー ダ に よる ソノ フト 開発 


その 実行 例 を 次 に 示し ます . 


RMAC で ヽ 
アセ ン フ ノル 


し た も の 
④ ②) ③ くり 
『 『 『 『 
>LBO MAIN。MODUL 1 ,。 MODULX 。 MAINX/E/N / Mo L80 の 実行 . ①, @, ③ の 各 リ ロケ ー タ プル ・ オ プ ジ ェ フト に の モジ ユー 
ル を リン ク し , ファ イル 名 ④ の `COM" フ ァイル を 生成 する . | 
Link-BO さ 。.4 る 14-Apr- 昌 1 Copyright (c) 19 昌 1 MiCrOsof キ | 


Data O1QOO O17 く 。 すま 6 アテ ーー 生成 され だ 純 マ シン ・ コ ー ド は , アド レス 100H-1A/H に ロー ド お れる 
167 バ イト の 容 時 で ある こと を が が し て いる . 


さ 2596 Bytes Free 一 残 つ て いる 使用 可能 メモ リ 容 量 ( こ の 値 は CP/M の サイ ズ に よ つ て 異な る ). 
EQOQOO Q1A7 1 ] 


4 

生成 され だ 純 マ シン ・ コ ー ド の ペー ジ 数 (1 ペー ジ は 256 バ イト ). 
A>DIR MAINX.*) 生成 され だ COM フ ァイル の 確認 . 
Ai MAINX COM ファ イル 名 "MAINX“ の COM フ ァイル が 生成 され て いる . 


仙 > 


Figure-3.2.5 RMAC で アセ ンプ ブル し た モジ ュー ル を , 他 の モジ ュー ル と リン ク す る リン カ の 実行 . 


これ で 最終 的 な 実行 可能 の オブジェ クト ・ フ ァイル , MAINX . COM” が で き 上 り ま し た . さっ そ 
く こ の プロ グラ ム を 実行 し て み ま し ょ う . た だ し , この プロ グラ ム は , Z80 用 に 書か れ て いま す の で , 
8080 や 8085 を 使っ た マシ ン の 場合 に は , ソー ス ・ フ ァイル の 変更 が 必要 で す . 

で き 上 っ た プロ グラ ム の 実行 例 を 次 に 示し ます . 


ーーーーーーーーーーーー、 


>MAINX) 完成 し た プロ グラ ム の 実行 . 


KEY IMNEUT ( 時 / A /N )7 2 
HELLOD BOOD MORNING 


KEY JNEUT (MM/ 人 AA/NO2 26 
HI ! GOOD AFTERNOON 


KEY INEUT (M/aA/N)? >N 
BOODD NIGHT BYE-BYE 


NM 


KEY INPUT (NMN / A / N )? > < -C せ -Z の キー イン に より プロ ブラム を 


終了 し て CP/M に 戻る . 
人 > 


Figure-3.2.6 リン ク に より 完成 し た プロ グラ ム の 実行. 
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3.3 MACRO-80 に よる モジ ュー ル 別 ソフ ト 開 発 法 と LINK-80 


9.9.1 モジ ュー ル 列 ソフ ト 開 発 法 と は 


ノ ソフ トウ ェ ア の 開発 に お いて 大 き な シ ステ ム の 開発 に な る と , CP ン M に 付属 し て いる “ASM” や , 
前 述 の "MAC" な どの アプ ソリ ュー ト な アセ ンプ ブラ (絶対 番地 の オプ ジェ クト ・ コ ー ド を 生成 する ア 
セン プ ブラ) で は , 能率 の 良い 開発 を 行う こと が 困難 と な り , 今 か ら 解説 を 行う MACRO-80” や 前 述 
の “RMAC” な どの リロ ケー タブ ル な アセ ンプ ブラ (リロ ケー タブ ル な オプ ジェ クト ・ コ ー ド を 生成 す 
る アセ ンプ ブラ ) が 使わ れる よう に な り ま す . つま り , 大 き な シ ステ ム を 開発 する 場合 , 長大 な プロ グ 
フ ム を 頭 か ら 順 に コツ コツ と 書い て いっ た の で は , 大 変 な 時 間 が か か り , その デバ ッ グ も 容易 な こと 
で は あり ませ ん . 

で は , どう すれ ば いい の で し ょ う . そこ で “モジ ュー ル 別 ソフ ト 開 発 法 ′ が 登場 し て くる 訳 で す . 
(この 開発 法 は ,、 マシ ン 語 に 限ら ず 高 級 言 語 に つい て も 同じ で す ). 

大 き な シ ステ ム を 能率 良く 開発 する に は , 全体 の アロ グラ ム を , 数 個 か ら 数 十 個 の モジ ュー ル ( プ 
ロッ ク ) に 適切 に 分 割 し ます . そし て , 分 割 し た それ ぞ れ の モジ ュー ル に 対し , 入力 条件 。 出力 条件 
な ど , 仕様 を 明確 に 定め た 上 で それ ら の モジ ュー ル を 複数 の 開発 現場 に 分 散 し , それ ぞ れ を 同時 に 平 
行 し て 開発 を 進め る の で す . 

デバ ッ グ は , モジ ュー ル 上 単位 、 あ るい は 関連 ある いく つか の モジ ュー ル を リン ク し て 行い ます , 開 
発 責任 者 は ,、 すべ て の モジ ュー ル の 開発 の 進み 具合 を 見 な が ら ,。 すべ て の モジ ュー ル が , ほぼ 完成 し 
た 適当 な 時 期 に , 全体 の モジ ュー ル を リン ク し て , 総合 的 な を デバッグ に 入り ます . 

この よう に , 大 き な プ ログ ラム を いく つか の モジ ュー ル に 分 割 し て , それ ぞ れ を 独立 に 並列 し て 開 
発 を 行い 最後 に 1 つ に まとめ て 完成 させ る 方 法 が "モジ ュー ル 別 開発 法 *′ な の で す . 

炊 の 図 は . この “モジ ュー ル 別 開発 法 ′ の 考え 方 の アウ トラ イン を 図示 し た も の で す . 
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マク ロ ・ ア セン プラ お よび リン ク ・ ロ ー ダ に よる ソフ ト 開 発 
大 き な シ ステ ム の 開発 
ーー 
モジ ュー ル に 分 割 . それ 一 部 モジ ュー ル の 仕様 変更 


ぞ れ の 詳細 な 仕様 決定 


ささ > 出 再 S ミ ー ロ 中 避 | 


Figure-3.83.1 モジ ュー ル 別 ソフ ト 開 発 の 概念 図 


3.93.2 MACRO-80 の 機能 


MACRO-80 は , イン テル 形式 の 8080 ニ ー モ ニッ ク , お よび ザイ ログ 形式 の Z80 ニ ー モ ニッ ク を アセ 
ンプ ル し 。 リ ロケ ー タ ブル な オプ ジェ クト ・ フ ァイル と , PRN リ スト ・ フ ァイル , それ に シン ボル ・ 
テー ブル の リス ト ・ フ ァイル を 出力 する 8080/Z80 両 用 の アセ ンプ ブラ で , マク ロ 機 能 を 持っ て いま す . 

MACRO-80 に より 生成 され る リロ ケー タブ ル ・ オ ブ ジ ェクト の 形式 が , リロ ケー タブ ル ・ オ プ ジ ェ 
クト の \ 標 準 フ ォ ー マ ッ ト ” と な っ て お り , 3. 2 章 の RMAC な どの 他社 の アセ ンプ ブラ は も と より , 5 
章 で 取り 上 げ て いる よう な , 各種 高級 言語 の コン パイ ラ 出 力も ,、 リロ ケー タブ ル な も の は , ほとんど 
が この 形式 を 採用 し て いま す ( 3. 2 章 の RMAC に よる も の と の リン ク , 3.5 章 の コン パイ ラフ と の リン 
ク を 参照 ). 
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マク ロ 機 能 は , 3 . 1 章 の MAC と ほ ば 同じ 機能 を 持っ て いま す の で , MAC の 項 を 参照 し て 下さ い ( た 
だ し , MAC で 可能 な マク ロ ・ ラ イブ ラリ を 取り 込む 機能 は ,。 MACRO-80 に は あり ませ ん /). 


3.3.3 MACRO-80 に よる モジ ュー ル 別 ソフ ト 開 発 の 実例 


で は , モジ ュー ル 列 開発 法 に より ,。 1 つの 簡単 な ゲ プログ ラム を 作っ て み ま し ょ う . 

作成 し よう どす る プロ グラ ム 自 身 は , モジュール 別 開発 を 行う け ま で も な い 簡 単 な も の で す が , 要 は 。, 
その 手法 , 開発 過程 に 注目 し て 下さ い . 

次 の よう な プロ グラ ム を 作成 し ます . 


@ プ ログ ラム 名 は "MAIN^. 
@ プロ グラ ム を 起動 する と ,「 コ マン ド を 入力 せよ 」 と いう メッ セー ジ を 表示 する . 
@ そこ で いび M′ を キー イン する と 「GOOD MORNING」 
っ / 「GOOD AFTERNOON」 
*N? / 「GOOD NIGHT , 
と 表示 され , 再び コマ ンド 入力 に 帰る . 
@ プロ グラ ム の 終了 は , Ctrl-Z を キー イン する こと に より , CP ン M に 戻る . 


上 記 の プロ グラ ム を 実現 する た め に , プロ グラ ム 全 体 を 次 に 図示 する よう に 3 つの モジ ュー ル に 分 
け , それ ぞ れ に つい て 別々 に 開発 を 行う こと に し まし ょ う ). 


メイ ン ・ モ ジュ ー ル (モジ ュー ル 名 *MAIN* ) 


モジ ュー ル | (モジ ュー ル 名 MODUL1* ) 


モジ ュー ル 2 (モジ ュー ル 名 “MODUL2* ) 


Figure-3.3.2 3 つの モジ ュー ル に 分 けら れ た 各 モ ジュ ー ル の 機能 
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ここ で は ,。 この よう に 簡単 に モジ ュー ル に 分 ける こと が で きま し た が , 実際 の 大 き な シ ステ ム の 開 
発 と な る と, 全体 の アル ゴリ ズム を 考え , 各 モ ジュ ー ル に 分 け , それ ぞ れ の 機能 を 特定 する 作業 は , 最 
も 大 変 な 作業 と な る で し ょ う . こ れ が で きれ ば , も う 開 発 は 半ば 完成 し た と 言っ て も 良い で し ょ う . 後 は 
だ た だ, モジ ュー ル 別 の 仕様 に 従っ て , それ を 満足 する プロ グラ ム を ひたすら 組ん で 行け ば 良い の で す . 


各 モ ジュ ー ル ・ レ ベル で の 開発 


き で . この プロ グラ ム の メイ ン ・ モ ジュ ー ル か ら 順 に プア ログ ラム を 作っ で 得 き ま も ょ うう). 


メイ ン ・ モ ジュ ー ル 

メイ ン ・ モ ジュ ー ル の ソー ス ・ リ スト を 次 に 示し ます . この 場合 、 モジ ュー ル 名 を 富 言 する 久 似 命 
令 の NAME” を 省略 し まし た の で , モジ ュー ル 名 と し て , ファ イル 名 が 自動 的 に 付け られ ます . 
今回 の プロ グラ ム は , Z80 用 に コー ディ ング し て あり ます の で , 8080 の マシ ン 上 で この 実習 を する 場 
和信 。 ジ ー ズ スズ ・ サ ズ スト の 一 部 を 要 上 し て 下る さい 。 


メイ ン ・ モ ジス ユー ル 、 MAIN" の ソー ス ・ フ ァイル を イズ / つ の に し て 水 ず . 


A>TYPE MAIN.MAC/ 


H ボボ ネネ ネネ ネネ ネネ ネネ ネネ ネネ ポポ ネ ポポ ポポ ネネ ポポ ネネ ポポ ボボ ポキ ポポ ボネ ポポ ネネ ボネ ポポ 
3 る 1 MACR ロ - ヨ BO SAMPLE PRODBRANM る 1 
H ボネ ボネ ネネ ネネ ネネ ネネ ポポ ボ ネル ポポ ネネ ポポ ボネ ポポ ネネ ポキ ネネ ネ ポポ ポポ ネネ ポキ ポポ ネネ 
キヤ ヤヤ や の 0 ここ の し こし ここ こく ここ 。 。。 アセ ンプ ブル に より 生成 され る PRN フ ァイル 
TITLE *ーーー MACRD-BO SAMFLE PROGRAM ーーー”* の ペー ジ ・ ヘ ッ ダ を 登録 . 
PUBLIC BDOS - シン ポル `BDOS" を , 他 の モジ ユー ル で も 使用 可能 シン ポル と し て 宣言 . 
EXT KEYIN。 MSGUUT | これ ら 5 つ の シン ポル は , 他 の モジ ユー ル で 宣言 され て いる 
EXT MSBINP 。 MSBBMNG 。 MSBAF T 。 PBBNIT | シン ボル で あり , 当 モ ジ ユ ー ル で 使用 する こと を 宣言 する . 
ASEG | これ 以後 の プロ グラ ム を , ロケ ーション ・ カ ウン の 起点 を 100H と し て , 紅 対 番地 で アセ ン [ 
DRG 1QOH | ブル する . つま り , ヾ ASEG* は , リロ ケー タブ ル な オプ ジェ クト は 生成 し な い . 
BDOE EQU OOQ5SH シス テム ・ コ ー ル の エン トリ ・ ポ イン ト . 
MAINs 
LD DE IHSBTNP| | コマ ンド 入力 を 十 す メッ セー ジ を 表示 する . メッ セー ジ の アド レス を 示す MSGINP* と , 
CALL 「 サブルーチン の MSGOUT" の シン ボル が , 外部 の モジ ユー ル の も の で ある こと に 注目 . 
CALL KEYIN コン ソー ル 入 力 . サブ ルー チン KEYIN* ガ , 外部 の モジ ユー ル の も の で ある ご と に 注目 . 
CFP * 眉 ? こ い 1 4 1 w 
W ん た RNI ト 。 8 
JR 2 , MDRNING | 人 カ が M/ な ら ば ^MORNIG" ヘ ジャ ンプ 
CFP | N メグ wW の 2 
JR 2 。 AFTERNQON A* 人 な なら ば YAFTERNOON" へ ジャ ンプ . 
CP >Nr | が w な 2 へ うえ ル う て 
JR 2。 ST 」 NN なら ば NIGHT" へ ジャ ンプ . 
この 19H 「 Ctrl-Z な ら ば プロ グラ ム を 終了 し て , CP/M へ 戻る . 
JR MAIN - いざ れ で も な い 場 合 は , も つう 一 度 ^MAIN" へ 戻る . 
MDRNI NG s 
LD DE ,[SGMNG] | シン ボル `MSGMNG* で 示さ れる メッ セー ジ の 文字 列 を , サブ プ ル ー チ ン `~MSGOUT” に より , 
CALL [MSGOUT] | コン ソー ル に 表示 する . これ ら の シン ボル が 外部 の モジ ュ ユー ル の も の で ある こと に 注目 . 
JR MAIN 再び *MAIN? に 戻り 繰り 返し . | 
AF TERNDDN: | 
LD | 


DE 。 MSGAFT| に w / 3 PS wo 
FALL | 同上 . シン ボル "MSGAFT“ の メッツ セー ジ を 表示 する . 


JR MATIN 


MACRO-80 に よる モジ ユー ル 別 ソフ ト - 開 発 法 と LINK-80 


Figure-3.3.8 メイ ン ・ モ ジュ ー ル ^*MAIN” の 組 半 ス ・ リ スト 。, 


押上 記 ソ ー ス ・ リ スト を 基 に , エディ ク を 使っ て で 粒 較 ス ・ フ ァイル を 作り ます . ファ イル 名 は MAIN 。 
MAC" NE 生 ょ 
MACRO-80 で アセ ン ブ ル す る ソー ス ・ ファ イル の エク ステ ンション は , 必ず MAC で な けれ 雇 
な り ま せん . 
6 証 2 う ファ イル が 作成 で きた らち 。 次 は アセ ンプ ブル を 実行 し ます . M80 (MACRO-80 の コマ ン ド 革 
ファ イル 名 ) を 実行 する 際 の コマ ンド ・ ラ イ ン に 罰 論 前 述 の MAC や RMAC と 同じ よう に , 入力 ファ 
イル や 出力 ファ イル の 指定 や , アセ ンプ ブル 時 の 各種 の コン トロ ー ル を 行う こと が で きま す が , ここ で 
は 最も 基本 的 な 形式 で 実行 し ます . 3 「 
M80 に よる ソー ス ・ フ ァイル "MAIN . MAC* の アキ セン プル 例 を 次 に 示し ます 。 


Figure-3.3.4 M80 に よる ソー ス ・ フ ァイル “MAIN. MAC" の アセ ン ブ ル と , その 結果 の 確認 . 


この よう に , ソー ス ・ フ ァイル MAIN. MAC′ か ら , リス ト ・ フ ァイル “MAIN.。 PRN′ と , リ 
ロケ ー タ ブル の オプ ジェ クト ・ フ ァイル “MAIN、 REL′ が 生成 され て いま す 。 

次 に ,。 この PRN リ スト ・ フ ァイル を プリ ンタ に タイ プア ウト し て み ま し ょ う . プリ ント 用 紙 の 折り 
目 を 適当 な 位置 に セッ ト し て , 


A> っ TYPE MAIN. PRN へ P/ 
を 実行 する こと に より , プリ ンタ に PRN リ スト を 出力 で きま す . 
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ペー ジ ・ ヘ ッ ダ "TITLE* で 面 言 され だ も の . の 406 この PRN リ スト の ペー ジ 要 PRN リ スト ・ フ ァイル 最後 の シン ポル ・ テ ー ブ ル の ペー ジ . 


yr し y * Q * 
MACRD-BO SAHPLE PRDGRAN ーー- HQCRO-BO さ .4 Q1-Dec -BO FAGE 1 0 人: 全便 、ー ニ ー タ MACRO-8O ミ .4 O1-Dec-8O 


33 ます 33111313113331133313313111131113333 ま 38311331333 は 1 
きき PHACR ロ - ヨ O SANPLE PRUGRAN し 
1 すす 31313331311131311313313113833 は 131113331 


何 も 仁 い て いな い の は 。 1 記号 は , PUBLIC で ある こと を 志す . 1 
Mecrost 最 紀 アド レス で ある こと | 。 記 守 は . 前 ペー ジ の リス ト と 周 じ く , 
を 示す - エス ター ナル で ある こと を 示す 
SymbO1 =: 1 1 
AFTERN  O122 BDOS いい] KEYIN  O1O7* MAIN oloo 
HORNIN  O11 MSGAFT  O123* MSGINP O1O1* HBBSMNG 〇 11B* 
MSGNIT  O12B* MSGDUT QO12E* NIGHT  Q12a 


TITLE *ーーー IACR ロ DBO SAMPLE PRUGRAM ーーー* 
PUBLIC  BDOS 
EXT KEY IN。 MSGOUT 
EXT PSG INP 。 SGMNG 、 SGAFT 、 SBNIT 
* 記号 は . この シン ポル が 
る り 】 No Fatali error(s) 


MORNINGBs 
LD 
CALL 


JR 
RF TERNOONs 

LD DE 。 SGAFT 

CAL し ISGOUT 

JR MAIN 
NIGHT s 

LD DE 、 SGN! T 
CAL し PSGOUT 
JR IAIN 


END 


Figure-3.3.5 アセ ンプ ブル に より 生成 きれ た PRN リ スト ・ フ ァイル の プリ ンタ へ の タイ プア ウト . 
この よう に , PRN リ スト ・ フ ァイル は , 1 ペー ジ 50 行 の ペー ジ 割 り 付 けが 行わ れ ( 疑 似 命令 "PAGE" 
の 指定 に より , 任意 の 行 数 に 設定 する こと が 可能 ), ソー ス ・ フ ァイル で 宣言 し た "TITLE" に より , 
ペー ジ ・ ヘ ッ ダ 部 に タイ トル 名 と ペー ジ No が 表示 され ます . PRN リ スト 最後 の “PAGE S" の ペー ジ 
ほ 。 シン ボル ・ テ デ テープ アル が リ り リストア ウト きれ る ペー ジ で す 。 


モジ ュー ル 1 

メイ ン ・ モ ジュ ー ル の 場合 と 同様 に 。 ソー ス ・ リ スト , アセ ンプ ブラ の 実行 , 生成 され た PRN フ ァ イ 
ル の タイ プア ウト を 示し ます . 実行 方 法 な ど は , メイ ン ・ モ ジュ ー ル の 場合 と 同様 で す の で 省略 し ま 
E 記 

モジ ュー ル 1 の ソー ス ・ フ ァイル (MODUL1 . MAC) の リス ト . 


>TYPE MODUL 1 . MAC / 


PUBLIC KEYIN。MSGOUT ご の 2 つの シン ボル を , 他 の モジ ユー ル で も 使用 可能 シン ポル と し て 宣言. 


EXT SD0S 他 の モジ ュ ユー ル の シン ボル `~BDOS” を 使用 する こと を 宣言 
KEYINs 、 


LD CI | 、。 
CALL BDO0S | コン ソー ル か ら の 1 文字 入力 の サブルーチン . 


1980 


MACRO-860 に よる モジ ユー ル 別 ソフ ト 開 発 法 と LINK-80 


MSGOUTs 
LD 。 9 | 5 
CALL BDOS | メッ ピー ジ 出 用 の けり プル ー チ テン 
RET 


Figure-3.3.6 モジ ュー ル 1 (MODUL1 . MAC) の ソー ス ・ リ スト . 


ジー スス ょ ・ テ ァイル MODHL1 MAC*Y の テン グル 実在 


Aa>MBO_MODUL 1 , MODUL 1 =MDDUL1/Z/ MODUL1 .MAC を アセ ン ブ ル . 280 用 な の で */Z* ス イッ ツチ を 付け る . 


No Fata1 error (sg) 


A>DIR_MODUL1。*/ 生成 され だ 各 フ ァイル の 確認 . 

Qi MODUL1 PRN 』 MODUL1 MAC 』 MODUL1 REL 
ジー ス - ファ イル _。 。 。 

Q> 


Figure-3.3.7 ソー ス ・ フ ァイル “MODUL1 . MAC′ の アセ ン ブ ル と , 生成 され た 各 フ ァイル の 確認 . 


*TITLE* の 窒 言 が な い の で , ヘッ ダ 妥 の タイ トル は 表示 な れ て いな い . Eo 
・ シン ポ ボ ル ・ テ ー ブ ル の ペー ジ -. 


RACR0-BO さ .4 O1-Dec-BO PAGE 3 MACRD-BO さ .4 ひ 1-Dec--BOQ PAGE 5 


> *j を " い リラ テ こと を 赤 ず . 
は 、 り ラテ ィ ブ ・ ロ ケー ショ ン の 人 3 ! と “で, PUBLG で の つ リ ラテ ィ ブ で ある こと を 志す 
( こ こと を 赤 す . に 】 っ 区 
人 Symbolss に 5 
BDOS OOO ウ キャ KEYIN QooOoi " MSGOUT  QOoei" 


No Fatal @rror(s) 
NSGOUTs 


w 


Figure-3.3.8 生成 され た PRN フ ァイル “MODUL1 . PRN′ の タイ プア ウト . 
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モジ ュー ル 2 

モジ ュー ル 2 の 場合 も 同様 に , 
遇 の た を ト を 示し ます 、 

モジ ュー ル の ソー ス ・ フ ァイル (MODUL2 . MAC) の リス ト . 


メー ヌス ・ リ ズ スト デン ブラ の 実行 。 生 万 きれ た 所 科 M フ ァイル の ダ タ 


nA:TYFE MOUDULS. MAC / 


FUBLIC MSGINF 。 MSGMNG , MSBAFT 。 MSGNIT 


CR ERU ODH 
EQRU OH 


MSGINF's DB CR、LF。、 KEY INFUT (MM/A/N)7 > | 


MSBMNB』 DB CR。LF。"HELLD BOOD MDRNINB' ,CR,LF。" 0 
iP 05 CFP.HT ! GOBD:APTENNMDONP CRyLP。TWL に (ソー「 


MSGBNITk DB CR。LF 。" BDOD NIGHT BYE-BYE' 。CR。LF 。" も" 


END 


Figure-3.3.9 モジ ュー ル 2 (MODUL2 . MAC) の ソー ス ・ リ スト . 
ソー ス ・ フ ァイル “MODUL2 . MAC” の アセ ンプ ブル 実行 . 


A>MBO MODUL2。 MODUL2=MHDUL2/Z 7 MODOL2.MAC を アセ ンプ ブル. 


NO Fata1 ら 司 ビ ビ OF( ら 5) 


A>DIR MODUL2。&/ - 生成 され だ 各 フ ァイル の 供 放 . 


Rs MODUL デ 2 MAC 』 MODUL デ PRN 』 MODUL 2 REL 
ソー ス ・ ノア イル 
仙 > 


Figure-3.3.10 ソー ス ・ フ ァイル “MODUL2 . MAC′ の アセ ン ブ ル と , 生成 され た 各 フ ァイル の 確認 . 


生成 され た PRN フ ァイル “MODUL2 . PRN”" の タイ プア ウト . 
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MACRO-80 に よる モジ ュ ユール 別 ソ フト 開発 法 と LINK -80 


シン ポル ・ テ デー ブル の ページ 


MACRO-BO さ .4 01-Dec-8O PAGE 1 1ACRO-BO 3。4 O1-Dec-8O PAGE に 】 


PUBLIC NGSGINP。MSGNB , SBAFT 。 SBN1T tacrO5* 
Symbo1 Bs 
EGU OoDH 4 Oo 


OAH D OOA NHSGAFT OO37I" SBINP OOQOOi* 
5 00 MSGMNG OO1FI* MSGNIT OOSO1* 


D 
ロケ ーション は すべ て リラ ティ ブ で ある . 
OD OoA 4B 48 MSGINPz DB CR。 し F。" KEY INPUT (MA / N うつ >? 


8 
8 
い 
3 
8 


Oo 4D る No Fata1 @rror( ら 5) 
4 メッ セー ジ ・ ス トリ ング が ガ が, アス キー コー ド に 変換 きれ て いる . 


MSGMNBr DB CR, し F。"HELLOD GUOD MORNINGY 。CR。 し だ 。* る > 


CR。 し F。"HI ! GOOD AFTERNOON' ,CR。 し F "97 


CR,。LF。' GODDD NIGHT BYE-BYE' 。CR。 し F。 る 


Figure-3.3.11 生成 され た PRN フ ァイル の タイ プア ウト . 


さて , 以上 で 「 メ イン ・ モ ジュ ー ル 」,「 モ ジュ ー ル 1 」 「 モジュール 2 」 の すべ て の モジ ュー ル の 
開発 が 一 応 終 わり まし た . 本 来 な らち ら ば , モジ ュー ル 単 独 で の デバ ッ グ を 行う 訳 で す が , ここ で は 省略 
し て いま す . 次 の ステ ッ プ は , いよ いよ "リンク" で す . 


LINK-80 に よる オプ ジェ クト ・ モ ジュ ー ル の リン ク 


リン ク ・ ロ ー ダ は , 今 ま で バラ バラ に 開発 を 行っ て き て , で き 上 っ た 各 モ ジュ ー ル の リロ ケー タブ 
ル ・ オ ブ プ ジ ェ クト ・ フ ァイル (例え ば , MAIN . REL や , MODUL1 . REL な ど ) を , 任意 の 順序 で つ 
な き 合 わせ , 実行 可能 な 絶対 アド レス を 持っ た 1 本 の オプ シェ クト ・ フ ァイル (COM フ ァイル ) に 変 
換 す る も の で す . 

今回 の 例 で は , 次 の 図 に 示す よう な こと を 行い ます . 
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デイ ン ・ モ ジュ ー ル TO 


ーーー 


_ MAN.REL が Ya。 
失 83 Se 
絶対 アド レス こん さま - 徐 寺 c LOW 
ーー 、 本 ] MAN ン EN により, メイ ン ・ メ モリ 上 の 
介 還 |) オプ ジェ クト が , ディ スク 上 に 
絶対 アド レス |  *MAIN.COM' と し て セー ブ さ れる . 


生 ジ ュー ル 】 メイ ン ・ モ ジュ ー ル の 後に 続け て 


ーー Da ケー ト き れ た 


ジュー ル | 


5 


| リロ ケー ト さ れ た | 
モジ ュー ル 2 


モジ ュー ル 2 


HIGH 


リロ ケー タブ ル 
・ ア ドレ ス メイ ン ・ メ モリ 上 に , 実行 可能 な 
絶対 アド レス を 持つ オブ ジェ クト 


と し 得 思 aー ド され る 。 


Figure-3.3.12 リン ク ・ コ マン ド L80 MAIN, MODUL 1 , MODUL 2 ,MAIN プ EN を 実行 し た 場合 の 働き 


で は 。LINK-80 (コマ ンド ・ フ ァイル 名 “L80 . COM” ) を 実行 し て み ま し ょ う . 

E80 も 実行 時 の コマ ンド ・ ラ イン に オプ ショ ン の スイッチ” を 付け る こと に より , ロー ディ ング に 
際 し , 各種 の 処理 を 行わ せる こと が で きま す . 

今回 の リン ク 実 行 時 の コマ ンド ・ ラ イン の 意味 は , 


L80 を 起動 し , | 
ディ スク 上 の MAIN . REL” を 実行 可能 な オプ ジェ クト ・ コ ー ド と し て ロー ドレ し, 

それ に 続け て , MODUL1 . REL′ と “MODUL2 . REL*” を 同様 に ロー ド し , 

メモ リ 上 に ロー ド し 終わ っ た , 実行 可能 な オプ ジェ クト を “MAIN . COM" と いう ファ イル 


ーー ズ グ - 上 ネー プ 上 、 
5. セー ブ が 終了 し た 後 ,。 CPM に 戻る . 


心 、 ら 65 ト う ビ 


と いう 内 容 を , L80 に 指示 し て いま す . 
その 実行 例 を 次 に 示し ます . 
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Figure-3.8.18 L80 に よる リン ク ・ ロ ー タ の 実行 例 . 


この 場合 ,、 メ イン ・ モ ジュ ー ル は ,。 “ASEG”" と “ORG 100H” に より , 先頭 の ロケ ーション は 100 
H に 指定 され て お り , L80 の コマ ンド で 特に 指定 し な く て も , “MAIN . REL* は 自動 的 に 100H か ら ロ 
ー ド され まず すず. 

他 の モジ ュー ル は , “CSEG” 指定 (ソー ス ・ フ ァイル に ,。 ASEG, CSEG, DSEG な どの 指定 を 省略 
し た 場合 は , 自動 的 に CSEG 指 定 と な る ) な の で , リロ ケー タブ ル で あり , それ ぞ れ 前 モジ ュー ル の 最 
後 の ア ドレ ス に 続い て ロー ド さ れ ま す . “ 


次 に , 生成 され た COM フ ァイル を DIR で 確認 し て み ま し ょ う . 


-Figure-3.3.14  L80 に より 生成 され た COM フ ァイル の 確認 . 


この よう に 。 3 つの モジ ュー ル の “REL” オブ ジェ クト ・ フ ァイル か ら , 実行 可能 な 1 本 の “COM? 
ファ イル が 生成 され て いる こと が 確認 され ます . 


リン ク さ れ た プロ グラ ム の 実行 


リン ク が 終わ る と , 次 は ブログ ラム 全体 を テス トラ ン さ きせ て , 総合 的 を デバ ッ グ に 入り ます 。 バグ 
が あれ ば , 該当 モジ ュー ル の 修正 一 再 リ ンク を 繰り 返し 行い ます . 

当 プ ログ ラム は 単純 な の で 、 デ バッ グ の 必要 も な い 程 で す が , 一 応 , 実 動 テ スト を し て み ま し ょ う . 

当 プ ログ ラム “MAIN . COM” の 実行 例 を 次 に 示し ます . 


185 


マク ロ ・ ア セン プラ お よび リン ク ・ ロ ー ダ に よる ソフ ト 開 発 


/ eatN リン ク し て 完成 され た プロ グラ ム の 実行 ヽ 
| EEY INFUT を だ 内 / 和則) 2 2 | 


2 
HELLD GOOD MORNING 


的 kY NEMT 4 時 / 肌 / 多 ) う 7 プ 2A 
HI ! GOUOD FTERNOON 


KEY IMEUT (NM/A/NO2 >h 
BODOD NIBHT BYE-BYE 、 


KEY IMPUT  ( 時 / 有 月 /M)? タ >^ た Gtrn-Z の キー イン に よ の 、。 プ ログ ラム を | 
| 終了 し て CP/M に 戻る . 


Figure-3.3.15 完成 し た プロ グラ ム の 実行 . 


に 


この よう に , プロ グラ ム は 完 動 し , 今回 の 開発 は めで た く 終 了 と いう こと に な り ま し た . 


リン ク ・ ロ ー ダ の その 他 の 解説 


L80 の 実行 は , Figure-3.3.13 に 示さ れ て いる 例 の ほか , 次 の よう に , モジ ュー ル を 1 つ 1 つ 入力 し 
で ゅ いっ て も リン ク す る こと が で きま す ,. モジ ュー ル が リン ク き れる た びに , 最終 アド レス や オプ ジェ 
クト ・ サ イズ を 表す 値 が 増加 し て いく の で , リン ク の 動作 を 実感 する こと が で きま す の で , 試み て 下 
さい . その 実行 例 を 次 に 示し ます . 


mn EE 還 、 
A:LBO ) L80 を 起動 . ハ 


Link-ーBO さ 。43 14-Qpr--B1 Copyr1iqht (Cc) 19 昌 1 Mi1CrO5SOf 人 
%MAIN) 一 メイン ・ モ ジュ ユー ル を 入力 . 


Data O1QO Q1 さ さ * 8 
ーKEYIN  O10O7 ーMSBAFT O12 マ -MSBINP O1O1 
ーMSGMNG O11B -MSGNIT QO12B ーMSGODUT O12E 


6 Undefined ロ 1ODa1 (8) 
さ 2712 Bytes Free 


%MDDUL17 モジ コー ル 1 を へ 刀 . 
Data O1Q0O O1 SF く 6 さる > 


ーMGGAFT O12 マ ーMSGBINF Q1O1 ーMSGMNG O11E 
ーMSGNIT O12B 

4 Undefined ロ 1ODa1 (5) 
さ 2700 By モ es5 Free 


*MOUDUL27 : モ ジュ ユー ルス を 入力 
Data QO1O0O O1 AZ く 167: 


さこ ら 96 By 上 5 Free 


MACRO-860 に よる モジ ユー ル 別 ソフ ト 開 発 法 こ と LINK-60 


リー ラリ EN 1 NO NM で | 


Dat ぁ a Q1QO Q1 人 7 ス まあ / ッ > 

さこ ら 96 Bytes Free 

EQQQOQO O1A7 1 ] | 
( 
\ 


Figure-3.3.16 L80 に よる 別 の 方 法 で の リン ク . 


ご の の 林 二 に り シク ロー ダ を 実行 し て も , 前 回 と 全く 同様 な "COM” ファ イル が 生成 され , プロ グ 
ラム は 完 動 し ます . 

Figure-3.3.13 や , 上 記 の L80 の 実行 に より 生成 され た 実行 可能 な オプ ジェ クト ・ フ ァイル を 。 DDT 
か 本 ao て デン も し もそ 本 だ 示し ます 。 


A>DDT MAIN.COM ) DDT を 起動 し て , "MAIN.COM" ロ 一 ド す る . 
DDT VERSG 2。2 


NEXT PC L8OU が 挿入 し を スペ ー 
Q200 O1Q0GO へ コー ド に 、 
メイ ン ・ モ ジュ ユー ル . ジュ ー ル 1 . 
さ 9 O1 "CD さる Oi1 FE 4D 2 /OD FE 41 2 日 | 。?。。9。. さ 。。M(、。A( 
FE 1 CB 1 E6 11 5E/O1 CD 39 Q1 ya ッッ ター つこ 。 
CD さ 9 Q1 18 D6 11 BF QO1 CD さく 9 OQ1 ーー に / 
に たけ りう 00 に じ サ 0E 02 CB 0 09 CVIOD |、。 、、。。。。。。、。。。。: 


49 4E 5O SS554 20 20 28 20 4D 2O .kEY ENPUT  *( 則 

2Z0 4E 20 29 3F 20 20 3E 24 OD OAI/ A / N )? >$。。 
2O 20 47 4F 4F 44 20 4D 4F 52 4E|HELLUD BOOD MORN 
24 OD OA 4 49 20 21 20 20 47 4FI INB。. ま 。。HI ! GO0 
54 4S 52 4E 4F 4F 4E OQOD QA 24 QDIOD AFTERNOON. . *。 
20 4E 49 47 4 S4 20 20 42 59 45| .BDODD NIGHT BYE | 
0 人 AN 2Z410111 は D6 11 8F 0】 CD 39 01 -BYE、。%。、。。。。。、。 9。 | 
しり 9 の 0) に サ 0 に 0 CD OR OO ビラ 9 00 。。 。、、。、。。。、。。 。、 


ー モ ジュ ユー ル 2、 / 


Figure-3.3.17 完成 し た 実行 可能 オプ ジェ クト ・ フ ァイル の ダン プ 


ょ つの モジ ュー ル が 。 上 記 の よう に 型 置 され て いる こと が 分 か り ま す . 

捧 に , 今 ま で は , アド レス 100 古 を スタ ー ト ・ ア ドレ ス と し て リン ク を 行っ て きま し た が , 任意 の ア 
ドレ ス を スタ ー ト ・ ア ドレ ス と し て ロー ド す る に は どう すれ ば 良い で し ょ う . その 実例 を 示し ます . 

まず , メイ ン ・ モ ジュ ー ル の ソー ス ・ フ ァイル に 書か れ て いる , “ASEG? と “ORG 100HZ の ス 

ター ト ・ ア ドレ ス を 絶対 番地 の 100H に 固定 する 2 つの 疑似 命令 を , Figure-3.3.3 の ソー ス ・ リ スト MAIN . 
MAC”" か ら 削 除 し , ファ イル 名 を 変え て "MAINXADR . MAC′ と し て お きま す . その 後 , Figure 
-3.3.4 と 同様 に アセ ンプ ブル し て , “MAINXADR . REL* を 生成 し て お きま す . その 時 に 生成 され た PRN 
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ファ イル を タイ プア ウト し て , その 1 ペー ジ 目 を 次 に 示し ます . Figure-3.3.5 の PRN リ スト と 比較 し 
て 下さ い . 


*ASEG"。 "ORG*" を 閉 際 し だ メイ ン モ ジ ユ ー ル の PRN リ スト 


ーーー MACRD-BO SAMPLE PRDGRAM ニーー'* MACR0-BO さ .4 O1-Dec-BOQ PAGE 1 


まま 11333 も も 】 ペー は すま 33113133 ま 331133338】 y こ と 
CRD-BO SAMPLE PROGRAN 
3 まま 1131331 人 えよ すす 3 も する.】 人 


TITLE *ー ニ ーー MACRD-BO SANPLE PROUGRANM ーーー" 
BDOS 
KEY IN。 MSGOUT 
NMSG INP , WSBMNB 。 ISBAF T 。 SBNIT 
べ て の アド レス に , "リラ ティ ブ * 
(WS) を 表記 * が 付い て いる . ooO5H 
1 


DE , SGINP 
PMSGODUT 
人 


2 ッ ・POmwrNe 
> -AFTERNOON 


Z,NIGHT 
1QH 


る 
IMAIN 


MORNING* 
LD DE 、 WSBMNG 
CRLL MSGOUT 
JR MAIN 
AFTERNDON: 
LD DE , SGAFT 
MSGOUT 
HAIN 


DE , ISSN! T 
NMSGOUT 
NATIN 


Figure-3.3.18 *ASEG", ORG” を 削除 し た メイ ン 
・ モ ジュ ー ル の PRN リ スト . 


さき て, 任意 の アド レス へ リロ ケー ト す る 準備 が で きた の で ,。 プロ グラ ム の スタ ー ト ・ ア ドレ ス ( メ 
イン ・ モ ジュ ー ル の 先頭 アド レス ) を 4000H と し て , L80 を 実行 し て み ま し ょ う . その 実行 例 を 次 に 示 
も ます 


A>LBO) L80 を 起動 


Link-BO さ .43 14-Apr-B1 Copyright (c) 19 昌 1 Microsoft 


*/Ps 40O0O。MAINXADR 。 MDDUL 1 。 MODUL2/E ) 最初 の モジ ュー ル の 先頭 アド レス を 4000H に セツ ト し て , 
IT シャシ 

Data 4QQO 4OA6 く < 166> 最後 は "/E" で CP/M に 戻る . 

さ 2597 By 上 es Free 

EQOOOO 4Oa6 64 ] 

A> 


Figure-3.3.19 プロ グラ ム の スタ ー ト ・ ア ドレ ス を 4000H と し て L80 を 実行 


上 記 コ マン ド の スイ ッ チ ゾン P : 4000” に より , 最初 の モジ ュー ル の 先頭 は 4000H に ロー ド さ れ だ は 
ず で す . 
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DDT で 全体 の ロー ド 状 態 を 確認 し て み ま し ょ う . その 実行 例 を 次 に 示し ます . 


Figure-3.3.20 DDT で アド レス 4000H か ら の ロー ド 状 態 を 確認 する . 


この よう に , リン ク は 先頭 を 4000H と し て 行わ れ て いる こと が 確認 で きま す . も ちろ ん , この プロ グ 
フ ム は 4000H ス ター ト て 実行 する こと が で きま す . 上 記 DDT を 終わ る 前 に コマ ンド “G4000J" に より , 
Figure-3.3.15 と 同様 に 当 “MAIN” プロ グラ ム を 実行 する こと が で きま す 。 試み て 下さ い . 


3.4 高級 言語 コン パイ ラ と マシ ン 語 と の リン ク 


本 書 の 5 章 で も , その 何 種類 か を 取り 上 げ て いま す が , コン パイ ラ 型 の 高級 言語 の 多く は , マイ ク 
ロ ソ フト 社 プ フォ ー マ ッ ト の リロ ケー タプ ル ・ オ プ ジ ェ クト ・ フ ァイル を 出力 し ます 

よっ て , メイ ンプ ブロ グラ ム を 記述 性 ・ 保 守 性 の よい コン パイ ラ で 作成 し , 高速 を 要求 され る も の や 。, 
アセ ンプ ブラ で な けれ ば 記述 が 困難 な 部 分 を アセ ン ブ ラ で 作成 し て , 両者 を リン ク ・ ロ ー ダ で リン ク し 
て , 1 本 の プロ グラ ム と する こと が で きま す (コン パイ ラ 側 が メイ ンプ ログ ラム で な けれ ば な ら な い 
訳 で は あり ませ ん ). 

まだ た だ, コン パイ ラ と アセ ンプ ブラ の リン ク に 限ら ず , 例え ば , COBOL か ら の リロ ケー タブ ル ・ オ プ ブ ジ 
ェ グ キン まお も だ からめ のり ロケータ ブル: キオ デジ ェ タ トト など お, コン パイ ラ と コン イラ と を リン グ す る 
こと も 可能 で す . 

実例 と し て , BASIC コ ン パ イラ (マイ クロ ソフ ト 社 の BASIC COMPILER "BASCOM*) と アセ ン 
プラ と の リン ク を 示し ます . 高級 言語 と マシ ン 語 と の リン ク と 言っ て も , 一 般 の パー ソナ ル ・ コ ン ピ 
ュー タ で 使わ れ て いる BASIC イ ンタ プリ ー タ か ら CALL や USER な ど で マ シン 語 を 呼ぶ こと は 。 基本 
的 に 異な り , ここ で て 解説 し て いる の は 高級 言語 で 作ら れ た マシ ン ・ コ ー ド と , アセ ンプ ラ で 作ら れ た 
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マシ ン ・ コ ー ド を , マシ ン ・ コ ー ド 同志 リン ク し て , 1 本 の プロ グラ ム に する こと で す の で , 誤解 し 
ルポ 。 な 

例題 と する プロ グラ ム は , 一 般 的 な 形態 を 取っ て , メイ ンプ ログ ラム を BASCOM で 書き , 高速 性 を 
必要 と する 演算 部 を アセ ンプ ブラ で 書く こと に し ます . 
プロ グラ ム の 内 容 は , 主題 が 見 失 な われ な いよ うに ご く 簡 単 な も の で , 


プロ ダグ ダラム を 起動 する お 。 つの 億 を キー イシ ずる よう だ に さ デ タモ セー ジジ が 家 示 きれ. 2 つ 
の 値 (例え ば xxx と yyy) を 入力 する と , 「xxx 十 yyy ニ Zzz」 の よう に , 2 つの 合計 の 計算 
式 と その 答え が 表示 され る . 


と いう も の で す . 
\ れ を あ 。 メオ ンプ ログ ラム と , サブ プ ア ログ ラム に 次 の よう に 機能 を 分 直し まず 


メイ ンプ ログ ラム (BASCOM) 


演算 サブ ルー チン (アセ ンプ ブラ ) 


3.4.1 BASCOM に よる メイ ンプ ログ ラム の 作成 


メイ ンプ ログ ラム の BASCOM の ソー ス ・ リ スト を 次 に 示し ます . この ソー ス ・ フ ァイル "HIGHLANG . 
入 AS ゲ 7 を 、 CPM の エ デ ォ タダ, あぁ あるいは MBASIC を 持っ て いる 方 は MBASIC 上 で 作成 し ます . 

内 容 は 単純 な の で 特に 解説 の 必要 は な いで し ょ う . プロ グラ ム を 簡単 に する た め , 数 値 を 2 バイ ト 
の 整数 と し て 取り 扱う の で , DEFINT?′ 宣言 を し て いま す . 

SNOC ンタ アリ で は ほ 。 も AEE ステー トメ ント の ドレ ス 値 が 宣言 され て いな けれ ば な り ま せ 
ん が , BASCOM で は , 宣言 され て いな いり 場合 は 自動 的 に EXT” シン ボル と し て 処理 され ます (3. 
2 お よび 3. 3 章 参 照 ). 


00 


107O PRINT』 PRINT "INPUT PARAMETER 1 QAND 2。 ( Parm1。parm2 ) > | 


108O INPUT PARAMETER 1 。PARAMETER2 
109O ” ン H し レシ スン に 、 。 し E レ シス マタ に じ に 、 。 BC レジ ス ツ に , 
11OO CALL MCNCAL (PQRAMETER1 。 PARAMETER2。 RESULT 〉 
4110 * 
{ 12O PR INT: PRrNT PaRamErERi・ + "3sPQRAMETER25 " = "3RESULT 
| 1 1 さ O GOTO 106O 
114O END 自動 的 に シン ポ ) い MCNCAL" と し て *EXT/ 処 理 さ れる . 
* 半 0 
Figure-3.4.1 BASCOM に よる メイ ンプ ログ ラム の ソー ス * り リスト. ファ イル 名 の エク ステ ンション は 


を 本 まめ だ っ 


傘 に これ を コン マイ ルト ます 。 

BASCOM は , バー ジョ ン 5.30 か ら ラ ンタ イム ・ ラ イブ ラリ の 使い 方 が 変更 され , 通常 の コン パイ ル 
で は ,。 フラ ンタ イム ・ ラ イプ ラリ の 一 部 は , 生成 され る *REL” オプ ジェ クト に 組み 込ま れず に . 下部 
フイ プラ リ と し て , プロ グラ ム の 実行 時 に 使わ れる こと に な り ま し た ,. た だ し . ブロ グラ ム を ROM 化 
する 場合 や , 完全 に 1 本 の プロ グラ ム と する 場合 は 。 ラン タイ ム ・ ラ イブ ラリ を 休部 オブ ジェ クト に 
組み 込む 必要 が あり 、 そ の スイ ッ チ が 実行 義 に ポ ナ ツン O” 靖 め すす ヤ この 穫 あ の に 12S: サ て よる 
の 5 本 全て だ )・ 

BASCOM の 実行 例 を 次 に 示し ます . 


QA>BASCUN HIGHLANG 。 HI1GHLANGB=HIGHLANG/ ロ 7 コン バ パイル の 実行 で /OZ ス イッ ツチ 本 文 参 照 ). e 


QQOOOO Fata1 Error(s) 
1OSB6 Bytes Free 
コン パイ ル 終 了 . 


A>DIR HIBHLANB。&*/ - コン パイ ル に より 生成 され だ 各 フ ァイル の 確認 . 
as HIGHLANG BAS s HIGHLANG PRN 』 HIGBHLANG REL 


。 、 ワー ス ファ ィ ル PRN フ ァイル リ 各 ケー タプ ル ・ オ プ ジ ェ エク フト.・ 
ノア イル 


SS P ーーーーーー ト ーーーーー ここ ーー ツーーーー 


Figure-3.4.2 BASCOM に よる コン パイ ル 実 行 例 と 生成 され た 各 フ ァイル の 確認 . 


以上 で メイ ンプ ログ ラム の リロ グ ケータ 坪 半 ・ オ プシ ェクト ファ イ ル が で きま し た . 参考 まで に は: 財 
成 さ れ た PRN フ ァイル を タイ プア ウト し て 示し ます . BASIC 言 語 の ソー ス が ,。 ア セン ブラ の ソー ス ・ 
レベ ル に 展開 され て いる (落ち て いる ) こと が 分 か り ま す . 


0 1 
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』 PRN フ ァイル の タイ ブ ア ウト 


_BAco 5.so A copyright 1979。 80,B1 (C) by MrCRogorT Se 1o962 ーー Free 


oo14 ooo7 1000 本 玉 六 
Oo14 OOO7 1O1O "*k MAIN ROUTINE BY HIBH LEVEL LANGUAGE * キ 
oo14 ooo7 。 1o20 1 
、 QO14 OoO フ 7 10 さ O ”" 
、 QO14 OOO7 1o4O DEFINT ^a-Z 
_ OO14 OOO7 1o5o * 
- QO14 OOO7 1O6O RESULT=O 


- ま ※ OO14* TOOOOOg CALL ト こ た バ 9 
*% OO17"LO1O000* LO1O10』 LO1O20』 LO10 さ O』 LO1040! LO1O5O』 LO1060s 


** OO17" し H。 OOOO 
** OO1A" SHLD RESULTX 
OO1D OQO9 1O7O PRINT』 PRINT "INPUT PARAMETER 1 AND 2。 ( parm1。parm2 ) > 
** OO1D"LO1O70』 CALL を PROA 
*※ OO2O* LX1 H。 く COn ら トッ > 
* ネ OO2 く る” CALL 委 PV2D 


ー ご の よう に アセ ンプ ラ の ソー ス ・ レ ベル に 変換 され て いる . 


Figure-3.4.3 コン パイ ル に より 生成 され た PRN フ ァイル の タイ プア ウト . 


3 .4.2 アセ ンプ ラ に よる 演算 ルー チン の 作成 
BASCOM の “CALL′ ステ ー ト メン ト に より , それ ぞ れ の 変数 の アド レス が , PARAMETER1 は 
(HL)、 PARAMETER2 は (DE), RESULT は (BC) の 各 レ ジス タ に より 与え 。 ら 私 ます よっ 外 当 
演算 ルー チン は , それ ら の 値 を 取り 出し て その 和 を 求め 、 RESULT の アド レス へ 答え を 格納 すれ ば 良 
い の で す . 極め て 簡単 な DAD” を 使っ た 16 ビ ッ ト の 和 を 求め る 演算 ルー チン の ソー ス ・ リ スト ( ア 
セン ブル に より 生成 され た PRN フ ァイル ) を 次 に 示し ます . こ れ を 基 に , ソー ス ・ フ ァイル "MACHINE. 
MA まじ を エディ タ で 御 三 し て 下さ きい ゆい. 


アセ ンプ ラ に よる 尊 算 サブルーチン の アセ ンプ ブル に より 生成 され だ , 3 人 
MACRD-BO さ .4 Q1-Dec-BO MACR ロ -BO さ .4 OQ1-Dec-BO 


人 11111111111111111113111113143331333334 MacrO5* 
5 【 ネ MACHINE SUB RUUTINE る 
必 114111111113111111111111313344311333131144. Symbo1 =* 


こ ミ , ず べ も MCNCAL  OQOQOOT" 
ジル LT roo ーッ ン uwowowus 


BLIC 宣 計 . 


MCNCARL 

QQOQo" C5 PUSH を 

re Fe Ys | AE の 凍 党 9 
| C レ ジス タ に ロー ド 

OOO マ " 46 M0V B。NM 

OOO4” EB XCHG | 

ooo5* SE IDV HU PARAMETER2 の 値 を 。 

QOOO6" 2 さ INX E レ ジス タ に ロード 

OOO7” 56 MOV 

OOOB" EB XCHG | PARAMETER1+PARAMETER2 

OOO ウ * O ウ 9 DaD ao L レ ジス タ に ロー ド . 

OOQO^A* じ 1 POP 

OOOB" 7D MOV 

OQOC” Q2 STAX 

OOOD" 9 た INX 

QQOE " フ C MOV 

OOOF" O2 STAX 

QQO1O" C9 RET 


No Fa も モ a1 ビビ OF (5) 


か 


| 年 で ある H. し レジ スタ の 値 を , 
| wRESULT* の アド レス へ スト ア . 


ロロ ピロ ヤ ヤセ ロロ 


ら ロ 


END 演算 サブ ルー チン 終り . リターン. 


Figure-3.4.4 アセ ンプ ブラ に よる 演算 ルー チン の ソー ス ・ リ スト (アセ ンプ ブル に より 生成 され た PRN フ ァイル ). 


ど 49 アス 


高級 言語 コン パイ ラ と マシ ン 語 と の リン ク 


ソー ス ・ フ ァイル "MACHINE . MAC′ を , M80 あ る い は RMAC で アセ ンプ ブル し ます (実行 例 は 


省略 。 3.2, 3. 3 章 参 照 ). 
アセ ン ブ ル に より , 演算 ルー チン の オブ ジェ クト ・ フ ァイル MACHINE . REL′ が 生成 され た ら 。, 


いよ いよ メイ ンプ ログ ラム と の リン ク を 符 い ます . 


3 .4.3 メイ ンプ ログ ラム と 演算 ルー チン と の リン ク 


L80 に より , 両方 の オプ ジェ クト を リン ク し ます . その 実行 例 を 次 に 示し ます . 


Figure-3.4.5 メイ ンプ ログ ラム と 演算 ルー チン と の リン グ ク . 


2 つの "REL" フ ァイル ,。 “HIGHLANG/ と MACHINE”" を リン ク し て , 1 本 の 実行 可能 な *COM/ 
ファ イル “LINKPROG . COM′ が 生成 され た は ず で す ., STAT コ マン ド で 確認 し て み ま し ょ う . 


Figure-3.4.6 リン ク に より 生成 され た 実行 可能 ファ イル の 確認 . 


この よう に , 10K バ イト の 「“LIKPROG . COM” が 生成 され て いま す . 小さ な プロ グラ ム で ある の 
に ,。 10 代 バ イト と 。 オプ ジェ クト 郊 率 が 良く な い の は , コン パイ ル 時 に スイ ッ チ バン O” を 付け て , す 
ペ て の ラン タイ ム ・ ラ イブ テリ を 取り 込ん た ど だ た めで あり 9。、 こ の タン タイ オム ・ ラ イプ ラサ を 別 フ ァイル 
の まま に し て お け ば 。 オプ ジェ クト は も っ と 小さ く な り ま すず (バー ジョ ン 5.30 以 上 の 場合 )。 

で は で き 上 っ た プロ グラ ム を 実行 し て み ま し ょ う . 実行 例 を 次 に 示し ます . 
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Figure-3.4.7 で き 上 っ た プロ グラ テム の 実行 . 
この よう に 合計 が 求め られ て いま す . 
注 ) 演算 は 16 ビ ッ ト の 整数 で 取り 扱わ れ ま す の で , 一 32767ー 十 32767 の 範囲 の 数 で な けれ ば な り ま 
せん . 


ここ で の 例題 は 非常 に 単純 な も の で す が , この 手法 の 応用 は , 複雑 で 時 間 の か か る 計算 や , 高速 性 
を 必要 と する 機器 の 制御 な どの ソフ トウ ェ ア の 開発 に 威力 を 発揮 する で し ょ う ). 
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76/ 


才 委 


と チン ンス 


ACT69 の 使用 例 


8bit の CPM マシ ン 上 で , 8080, 8085, Z80, 6502, 6800, 6809 な どの 8bit CPU, お よび 8086, 8088, 
Z8000 な どの 16bit CPU の アセ ンプ ブリ 言語 を アセ ンプ ブル する こと が で きま す . これ ら は “クロス ・ ア セ 
ンプ ブラ "と 呼ば れ て お り , 1 右 の CPM マシ ン で , 多く の 異な っ た CPU の ソフ ト 開 発 が 可 能 と な る 便 
利 な も の で す . クロ ス ・ ア セン プラ で あっ て も , その 機能 は 自分 自身 の CPU 上 で 使用 する アセ ンプ ブラ 
の どれ を も 上 回 る 製品 も あり , 正 に CPM な ら で は の 現象 と 言え ます . 

一 方 , 8bit の CPU の アセ ンプ ブリ 言語 の アプ ログラム を , その まま 16bit CPU の アセ ンプ ブリ 言語 の プロ グ 
ラム に , 自動 的 に 書き 変え て し まう トランスレータ" と 呼ば れる ソフ ト が あり ます . 

この 種 の ソフ ト は 現時 点 で は , 8080 ソ ー ス ・ コ ー ド を 8086 ソ ー ス ・ コ ー ド に トラ ンス レー ト す る も 
の と , Z80 ソ ー ス ・ コ ー ド を 8086 ソ ー ス ・ コ ー ド に トラ ンス レー ト す る も の が 発売 され て いま す が , そ 
の 他 の CPU の も の も 近々 に は 出現 する の で は な いか と 思い ます . 

本 草 で は , この よう な 開発 用 ソフ ト の 中 か ら , 6809 ア セン ブラ と 8080 一 8086 ト ラン スレ ー タ を 取り 
上 げ , その 使用 例 を 紹介 し ます . 


4.1 ACT69 の 使用 例 


ソー シム 社 の クロ ス ・ ア セン プ ブラ, “ACT” シリ ー ズ に は , 現時 点 で , 


ACT80 (イン テル 8080, 8085, Z80) 
ACT65 (モス テッ ク 6502) 

ACT68 (モト ロー ラ 6800) 

ACT86 (イン テル 8086, 8088) 
ACT69 (モト ロー ラ 6809) 


が そろ っ て いま す . これ ら は , どれ も ほぼ ば 同様 な み ア セン ブル 機能 を 持っ て お ぉ お り , 基本 的 な 機能 は 3 章 
で 紹介 し た “MAC” や MACRO-80? と 大 体 同 じ マ クロ ・ ア セン ブラ で す が , ACT 独自 の ユニ ー ク 
な 機能 も いく つか 追加 きれ て いま す . 「 

で は , ACT69 の 実行 例 を 示し まし ょ う ). 

ノー ス ・ フ ァイル は , ACT69 の ディ スケ ッ ト に 含ま れる テス ト 用 の ソー ス ・ フ ァイル を 使用 し ます . 
この ソース ・ フ ァイル は , 6809 の すべ て の オペ レー ショ ン ・ コ ー ド と レジ スタ の 組み 合わ せ が , アセ 
ンプ ブリ ・ ソ ー ス ・ プ ログ ラム と し て 書か れ て いる も の で す . 

この プロ グラ ム の 冒頭 に は , “LINK? 疑似 命令 で ディ スク 上 の 別 の ファ イル ~ADRM6809 . A69? を 
リン ク す る よう に 記述 され て お り , この リン ク の 様子 も 見 る こと が で きま す . 

ノー ス ・ フ ァイル “SMPL6809 . A69′ (ソー ス ・ フ ァイル の エク ステ ンション は ,。\A69” で な けれ 
ば な ら な い ) を タイ プア ウト し て 次 に 示し ます . 


0 フ 7 


他 の 8bit 〇 PU お よび 16bit CPU の ソフ ノ フト 開 発 


ンー 


/ Aa>TYPE SMPL6809。.A69 6809 の ソー ス ・ フ ァイル の タイ プア ウト . 

' ーー ファ イル 名 の エフ ステ ンション は `A69* で な けれ ば な ら な い 、 
TITLE *mp1 680O9 - MC68BO9 Opcode Listinq・ 
mp16 ヨ 0O9 6809 UpcCode List1n ロ ・ 


GinCe ther ら a レ 与 5O many addLes5S1ing mod@ COmb1inat1OnS。 
the fi し 呈 モ Dart Of thi5g 11ist onl1y has @nOugh 1n ら 上 じ uC1 On 
も O enGrat@ 与 V ら ry DOSS1D1e fi し byte。 


Th fi 1 ADRM6 ヨ 0QO9 .Q69 has One Of each addrG85 mOdG。 


/ 
nn GU に ) 
mm s らい 上 FEE 

| L1n ロ k AdrM6BO9 sa11 addressing modess ーー ファ イル "ADRM6809.A697 

| を 呼び 出し , 当 プロ グラ ム の 

| ORG $10O 最後 に リン フ す る . 

| 
QDCA 幕 nn 5s ヨ 9 0QO5 
ADCA nn s99 05 
QRDCA nn,。 X 3Q9 05 
DCA mm 8B ワ mmmm 
QDCB 幕 nn 3C9 05 
ADCB nn 3D9 QOS 
QRDCB B。X 3sE9 BS 
QADCB TiTLTiil ョ 上 F ワ mmmm 
QADDA 埋 n ロ sBB O5 
ADDQ nn s7B OS5 
QADDA EB。X] 5QB 595 
QDDAn mm 3 BB FFEE 
ORB alal 5 じ 人 
ORB nn 
ORB LUI 
DRCC nn 5 1 
PSHS PC。U、Y。X。DF。B。A。 に し 
PSHU PC。S。Y。X。 DP ,B。AQ。CC 
PULS PC。U。Y。X。DP。B。A。 ビ C 
PULU PC。S。Y。X。DP 。 B。A。CC 
ROL nn 509 QOS5 

| ROL 。X+ 369 BO 
ROL 還 人 人 人 3 79 FFEE 
ROLA 5 49 
TST nn 5 OD 
TST 0。-Y 
TST 仙人 人 

| TBTA 


ど 49! こ 


AC「69 の 使用 倒 


| TSTB | 
| 5 Endx DocDp69. ぁ asm | 
( ソ 
ーー} 人 DO SO WT エモ イエ モモ イイ ァ アー アー ヤァ ア ョ ッ セア アセ bb て mm NODTIOT II ン と 、…。 。 
Figure-4.1.1 6809 の すべ て の オペ レー ショ ン ・ コ ー ド が 含ま れる テス ト 用 ソー ス ・ フ ァイル の タイ プ 


Pc 人 


人 挫 に ,、 ブロ グラ ム 中 の 疑似 命令 ^LINK” で 呼び 出さ れる ディ スク 上 の も う 1 つの ソー ス ・ フ ァイル 
ADRM6809 . A69" を タイ プア ウト し て 示し ます . これ は ,..6809 の すべ て の アド レッ シン グ ・ モ ー 
ド が 記述 され た テス ト 用 の ソー ス ・ フ ァイル で す . 


/ A>TYPE ADRN6BO9.A69/ ディ スク フ 上 の リン フク され る も う 1 つの ソー ス ・ フ ァイル の マイ プア ウト 


すま 1 し に * 人 11 6BO9 Addressinq Modes。" 


1 Example Of a11 6BO9 Addressin ロ MOodess。 
n5s EQU 14 
_nBs EQU 127 | 
mm16* EQU OFEDCh | 
] 
> Accumulator Offswet。 | 
| LDD AX | 
| LDD 仙 。Y | 
| LDD A。 ら 5 | 
| LDD A。U 
LDD B。 X 
LDD B。Y 
LDD B,。 ら 8 
| LDD B。U 
| LDA D,X 
| LDA D。Y 
LDA D,S 
LDA D。U 
LDD EA。X] 
LDD LA。Y] 
LDD [LA。5] 
| LDD Ln 日 。 ら 8] 
| LDD Ln ヨ 。U] 
| LDD LnB,PC] 
LDD Lmm16。X] 
LDD [mm16。Y] | 
LDD [mm16。 ら 5] | 
LDD [mm16。U] | 
LDD [mm16。PC] | 
| | 
END ) | 
\ > / 
- ジ 
Figure-4.1 .2 プロ グラ ム 中 の 紅 似 命令 "LINK” で 呼び 出さ れる も う 1 つの ソー ス ・ フ ァイル の タイ プ 
アウ ト . 
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他 の 8bit CPU お よび 16bit ご PU の ソノ フト 開発 


で は ACT69 を 起動 し て 。 ア セン プラ を 実行 し て み ま し ょ う . その 実行 例 を 次 に 示し ます . 


0 PRN フ ァイル は ドラ イブ A : 上 に (HEX メ ファ イル は 指定 し て いな い の で ログ イン ・ デ ィ ス フ 上 に ). 
ソー ス ・ フ アイ ル る や リフ ァ レ ンス ・ マ ッ プ は フル 表示 を 行う . 
ヽ 4 
>ACT69 SNPL6BO9 し =Az  R=F/ ACT69 に よる アセ ンプ ブル 倒 |. 


SURCIM 68O09 Assembler ver さ 。. ら 5F 
Pass 1 一 Readino niSMPL68O 。 A69 
Pass 1 一 Reading iQDRM6BO 。 Q69 
Pass 2 - Readinqg nzSMPL6BO 。 69 
Pass 2 - Readinqg iQADRM68 ヨ O 。 69 
nO ERRORe 。 7 Labe1 ぉ =。 6S5O4h by 上 ら G* nOt uswed- Program LMA = QOS4B8h . 


A> アセ ンプ ブル 終 了 ず . 


Figure-4.1.3 ACT69 に よる アセ ンプ ブラ の 実行 . 


この よう に 。 それ ぞ れ の パス で 読み 込ま れる ソー ス ・ フ ァイル 名 が 表示 され て 行き ,、 アセ ンプ ブル が 
寺 まし た 。 “ 
生成 され た だ ファ イル を DIR で 確認 し て み ま し ょ う . 


A>DIR SMPL68O9. *) アセンブル に より 生成 され だ 各 フ ァイル の 供 語 . 


Ar SMPL6BO9 A69 』 SMPL6BO9 H69 :』 SMPL6BO9 PRN 
ノ ソース ′ ノ ク イ ル HEX フ ァイル PRN フ ァイル 
た 


Figure-4.1.4 アセ ンプ ブル に より 生成 され た ファ イル の 確認 . 


この 中 で *H69′ と いう エク ステ ンション の ファ イル が , イン テル HEX 形 式 の ファ イル で す . 
次 に 。 ア セン ブル の 内 容 を 見 る た め に , PRN フ ァイル を タイ プア ウト し て , その 中 の 数 ペー ジ を 示 
し ます 各 ペ ー ジ に は 。 ペ ー ジ ・ ヘ ッ ダ が 付き 1 ペー ジ の ライ ン 数 は デフ ォ ー ル ト で 61 ラ イン と な っ 
で いま ます 。 


以上 紹介 し た の は ACT19 の , ご く 基 本 的 な 実行 例 に すぎ な いこ と を お 断り し て お きま す . 


ACT「69 の 使用 例 


BODRCIN 6BO Aseemb1 '@r 3 さ 。S チ の 間 2o PaG@ 4 BORCI 6BOY Qpeemb1er ver さ 。S チ  O7/17/B2 44420 Pege 
1 @r wt * ^ ム 11 6BO9 Addrese+nqg Hodee。 As ADRMN6BOS 、A6 ツ 
Sap1 6BO9 - RC6BOS Opcode し ょ Gt4nG・ 9 て INK" に より 組込ま れ ね さ ソ ー ス ・ フ ァイル ガ ア セン プル され て いる . 
So Sop168O9 68O9 Opcodo し ょ et1nG け Ex ep1G of al1}】 6 ム BOO Add ア O ゃ @4 の 9 Rodg@。 


BincG も thGr@ arG SO の Geny addrG5B ら 1nG COdGG COnb わ ょ na は On@。 EGu 4 
て hG 1 と et part Of th16 11ett On1y ha ら @nOuGh 1ne も と いこ も 1 の On る ae や の 
も の gnGr otG Gve ァ ry POG る 1b】G 1 と et by も tG。 EGU OPEDCN 


The f1ie ADRH6BOS、A69 hoe one of each addrGGe mod@・。 
AcCumu1 atG ァ 0f そ ot 。 

し い 1 に 】 

equ @FFEE LDDO 


LDpD 
しょ nk Adr6BO ウ 3 8】 ) addr@g94 nG RodoG DD 


PPPP の pp の ちゃ ゃ る 
この < この くく CO ので て ※ ェ 


$88 1939 1996 


3 
日 


g989 


Autoneat ぇ て 】ncreoGnt & Decremont mode。 


の Cpp 
の Lpp 
tnn。X う CDp 
た LDp 
LDp 
LDp 
Lpp 
LDp 
Wi) 
LDp 
Lpp 
Cpp 
し pp 
し pp 
Lpp 
Lpp 
LDp 
LDP 
Cpp CO。B<*] 
LDp 【U** う 
CDpp 【--X} 


3888 


SBORCIR eeoy Aseegbier ve 3。SF OZ7/17/B2 14420 Pege 。 ら ム 6 


GORCIH 6BO ツ Aeeemblor ver 3。S チ 02/17/G2 1420 Page 18 
Bmp168O - MC6GO 々 Opcode し 16 も 1nG・ As BKPL6BO マ 、 A ら 9 


人 A3 1 OBO9 AddGrose1nG Ptodee。 人 ADR146BOO 。 AG 


OS82A も DD tnBg。81 
OBS2Dp LDD て nB。 り }) 
QS3O も DD tn8。PC3 
OSS34 し DD て am16。X} 
OS38 も DD tom36。Y3 
OS53C LDD tom16。8】 
OS54O も DD て mm36。 り ) 
OS44 DD tam136。PC】 


LSR 
LSR 
LSR 
し SRA 


OS48 END 


no ERRKORe 。 7 Lebe1e。 63O42h bytGe not ued。 ProgGram LMA = OS48h 。 
アセ ンプ ル 持 の コマ ンド ライ ン の "RF" 囲 定 に より . リ ファ レン ス ・ マ ッ プ . 
ペー ジ No. いく つ あ る か 


KO446 FEDC Yoe の io/3s io/34 io/35 。 1o/s6 10/37 

シン ポル その 角 14/ 5 11/ 6 14/ 7 3814/B 

NM PFFEE 301O 4721 1/26 1/31 1/36 1/38 
1746 1/47 1/51 1/52 1/5 マ っ 2/ 5 
2/25 2/42 2/4? 2/S9 2/61 3/ 々 
3/14 き /16 ト な い 】 3/21 3/26 3/28 
ミ / さ 7 ミノ 42 さ /54 3/S? 4/44 2/19 
2/27 4/52 2/57 2789 。 3/ 2 5/ 3 
S/34 S/16 S/49 83/21 8/24 5/26 
8/8B 6/ 4 6@/12 6/21 6/26 た 
6/8 さ 6/SB 7/ 4 7/ 8 フ /12 7/36 
7/2O フ ノ 24 7/26 7/35 7/4o 7/42 
6/12 
99 4 10/25 10/26 10/27 10/S6 10/57 
99 5 10/26 10/2 1O/3O 10/3】 10/32 
10Z6O 10Z61 131/ 2 14/ さ 
19 9 1/48 1749 1 /20 1/23 4724 
4/2 マ 7 ささ 1/34 1/39 1741 1/44 
1/74 マ 1/SO 4/S34 1/So 2/ る 2/17 
2/22 2/2 さ 2/4O 2/26 2/47 2/53 
3/ 2 き / ァ 3 ノ 17 ミノ 22 き /29 3/ さ さ 
3/45 さ /81 さ /82 ミ /86 さ /57 2712 
4/24 474?、 4/SO 2/S4 4/5S 4/eo 
3/ ら 3/17 8/22 S/27 5/S4 6/ 2 
6/18 2 人 】 6/2 さ 6/24 eZ29 。 eZ/3 き 
e/So 6/S1 6/S5 6/S6 7/ 2 7/ 6 
7/14 フ /18 7/22 7/2 さ 7/26 7/3o 
7/32 7/38 2/4 く 8Z1o 
2/ マ 2/1O 2/11 4 2/4 さ 2/14 
2027 2 ノ 2 フ 2/2B 2/29 2/3O 2/31 
2/3 さ 2/34 2/36 2 ノミ 7 2/38 
4/ さ の 4@31 4/31 4/32 2/3 き 4/ さ 4 
4/36 2/37 4/3B8 4/39 2/4o 4/44 
4/4 さ 4/44 4/25 4746 4/47 


nn し.】 


PC。U。Y。X。 DP。D。A。CC 
PC。B。 Y。X。 DP。B。A。CC 
PE。U。Y。X。 DP。B。A。CC 
PC。B。Y。X。 DP。B。A。CC 


nn 
9 を 


BODRC1KN ム BO マ Aseemb1er ve 3。SF  O2/17/B2 14s20 Page 8 
Sep1 6BO9 - KC6BO マ Opcode し ょ る て ょ 9・ As BMPL6BO5 。 A6 マ 


042 さ 1FSO 、 TFR PC。D 88 た 
oO42S 3FBO TFPR A。D 3 
Q427 1F9O TFPR B。D 54 
0O429  』FAO TPR CC。D 8F 
042B 1FBO TFPR DPD 4P 
の O422D 1F34 TFPR U。8 93 を 
042F 1】FAB TFR CC。 DP 14 
0O43 さ 1 1F さ マ TPR U。B 


る Sg88388 


O ひ 4 さく  QODOS T5T し し 3 Op 
oO435 6DA2 TST 0。-Y 

ひ 4 く 7 7D チ FEE TBT の mm 

Oo43A 4D TSTA 

o43B SD TSTB 


Endx Bop1 68O マ 。 ae の 


この 後に 。“UINK* に よ の 人 外 婦 の レー (フジ イル ガ 「 に フ さ きれる. 次 ペー ジ に 弁 く . 


Figure-4.1.5 ACT69 に より 作成 され た PRN リ スト 
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他 の 8bit CPU お よび 16bit CPU の ソフ ノ フト 開発 


4.2 XLT86 の 使用 例 


4.2.1 動作 の 概略 

XTT86 は ,8bit の CPM マ シン 上 で , 8080 の アセ ンプ リ 言語 プロ グラ ム を , 16bit CPU で ある 8086 
用 の プロ グラ ム に トラ ンス レー ト す る も の で あり , 今 ま で に 8080 用 と し て 作ら れ た プロ グラ フラ ム を 。 人 
手 に よる 書き 替え を 必要 と せ ず 。8086 用 プロ グラ ム に 変換 する こと が で きる も の で す . 

この 機能 を 図示 し た も の を 次 に 示し ます . 「 


8bit CPM て 実行 


8080 用 ソー ス ・ フ ァイル ( xxxx. ASM) 


8086 用 ソー ス ・ フ ァイル (xxxx.A86) 


8bit CPM PRN フ ァイル ( xxxx.PRN ) 


この ディ スケ ッ ト を CPM-86 に セッ ト し て , ASM86 で アセ ン ブ ル す る こと に より , 


8086 上 で 実 動 す る オブ ジェ クト を 得る こと が で きる . 
I6bit CPM 


CP ン M-86 
アセ ンチ デラ 
ASM86 


8086 用 ソー ス ・ フ ァイル ( xxxx. A86) 


8086 用 へ キサ ・ フ ァイル (xxxx.H86) 


8086 用 リス ト ・ フ ァイル (xxxx.LST) と シン ボル ・ フ ァイル (xxxx.SYM ) 


(CP ノ M-80 の LOAD コ マン ド に 相当 する も の ) 


8086 用 コマ ンド ・ フ ァイル (xxxx .CMD ) 


従来 の 8080 用 プロ グラ ム が , 8086 上 て 実行 され る . 


Figure-4.2.1 8086 ト ラン スレ ー タ : XLT86 の 動作 原理 


この 図 か ら も わか る よう に , まず 結論 か ら 言 えば , 8080 用 に 開発 され た プロ グラ フラム を , その まま の 
機能 を 持っ た 8086 用 の プロ グラ ム に 自動 的 に 変換 する こと が で きる と いう こと で す . 


XL T86 の 使用 例 


で は , Figure-4.2.1 を 順 を 追っ て 説明 し まし ょ う . 

まず , 8080 用 に 開発 され た プロ グラ ム が あり , その アセ ンプ ブリ ・ ソ ー ス ・ フ ァイル が ディ スケ ッ ト 
上 に ある と し ます . 例え ば , 標準 的 な CPM の シス テム ・ デ ィ ス ク に 必ず 含ま れ て いる . ダン プ ・ プ 
ログ ラフ ラム の “DUMP . COM”" と , その ソー ス ・ フ ァイル “DUMP . ASM” な ど を 想定 すれ ば 良い で 
し ょ う . "DUMP . COM" は も ちろ ん すべ て の CPM 上 で 実行 する こと 0 ます が , 16bit の 8086 上 
で は 当然 な が ら 動 作 し ませ ん . 

8080 用 に 作っ た プログ ラム が , その まま で 8086 用 と し て も 使え れ ば , こん な あり が た いこ と は な い 
の で す が , これ を 可能 に する の が XLT86 で ある 訳 で す . 

ダン プ ・ プ ログ ラム を 例 に と る と “COM” ファ イル の “DUMP . COM′ は , 16bit に 関し て は 全く 
何 の 役 に も 立た な い の で , これ は 無視 し ます . 問題 は その アセ ンプ ブリ ・ ソ ー ス ・ フ ァイル DUMP . 
ASM” に あり ます . 

LT86 は , この アセ ン ブ リ ・ ソ ー ス ・ フ ァイル を 取り 込み 、 そ の プロ グラ ム の グロ ー バ ル な デー タ の 
流れ を 分 析 し , 適正 な 8086 の イン スト ラク ショ ン に 置き 替え ます . XLT86 の 生命 は , この \global data 
flow analysis" に あり , これ が , 同種 の トラ ンス レー タ に 比べ , 数 10% も 効率 の 良い イン スト ラク シ 

ョ ン を 発生 きせ て いる も の と 思わ れ ま す . 
| この よう に , 8080 の アセ ンプ ブリ ・ ソ ー ス ・ フ ァイル か ら ト ラン スレ ー ト され た 8086 用 の アセ ンプ ブリ ・ 
ソー ス ・ フ ァイル は , 任意 の ドラ イブ 上 に ファ イル 名 “xxxx.A86" と し て セー ブ さ れ ま す . そし て , 
この ディ スケ ッ ト を , CPM-86 マ シン に セッ ト し (ディ スク の ファ イル 構造 は , CP ン M-80, CP ン 
M-86 と も 同じ な の で , その まま どちら を どちら へ 持っ て いっ て も リー ド ・ ラ イト 可能 で す ), その ア 
セン ブラ “ASM86" で アセ ン ブ ル し , GENCMD (CP ン M-80 の LOAD コ マン ド に 相当 する も の ) で 
実行 可能 な コマ ンド ・ フ ァイル と する こと に より , 8086 上 で 元 の 8080 の 場合 と 同様 に ダン プ ・ プ ログ 
ラム を 実行 する こと が で きま す . 


4 .2 .2 XLT86 の 実行 例 


サン プル ・ プ ログ ラム と し て は , CPM ユー ザー で あれ ば 誰 で も 知っ て いる , 先程 の ダン プ ・ プ ロ 
グラ フラ ム が 適当 な の で す が , 紙面 の 関係 で , も っ と 短い プロ グラ ム で ある 本 書 2 . 2 章 の ファ ンク ショ ン : 
9 で の 実習 プロ グラ ム Figure-2.2.15 を 取り 上 げ て み ま す . 

その アデ センブリ ・ ソ ー ス ・ プ ログ ラム の ファ イル 名 を , ここ で は “FUNC9 . ASM” と し , : 代 の 
イプ アウ ト を 再度 次 に 示し て お きま す . 

この プロ グラ ム の 内 容 は 非常 に 簡単 な も の で , キー 入力 に 応じ し て それ ぞ れ の メッ セー ジ が 表示 され 
る だ け の も の で す (2. 2 章 の ファ ンク ショ ン : 9 を 参照 ). 
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他 の 8bit 〇 ピ PU お よび 16bit CPU の ソフ ト 開 発 


ノン ーーーーーーーーーーーーーーー に ーー ーー 9 EE 


QR>TYPE FUNC9 . QSH/ サン プル プログラム の アセ ンプ リソー ス ・ フ アイ ル を マイ プア / つ ト ダ る 、 


) キオ ルル ボネ ルル ルル オキ ホル ネ ホホ ネル ルル ホネ ルポ ルネ ルル ルネ ネル ホル ホル ルル ルポ ポル ネル キュ ネネ 5 
上 FUNCTIOUN 9』 PRINT STRING 5 
キオ ホオ ネル オオ ホ ホネ ルル ルポ ネ ルネ ネ ネル オル ホネ ネル ルネ ネネ ルネ ルネ ルル ネネ ネネ ルル ネル キネ 5 


ロ RG 1OOH 
| BTARTs 

MV に 。 
LXI D, MSG INF 
CALL OOO5H 
MV に じ 。 1 
CALL OOO5H 
に だ ょ 2 。 の 
JZ MONGOUT 
CFI *N" 
JZ NIGTOUT 
CP 1QAH =“Z 
RZ 
MV1 にし 。 ズ 
MV1 た に 
CALL OOOSH 
JNMP START 

MONGOUTs 
MV に 。 9 
LXI D, SGNONG 
CALL OOO5SH 
JMP START 

NIGTOUTi 
MV じ 。 ラ 
LXI D。MBGNIGT 
CALL OOOSH 」 
JNMP START 

MSBINP。 DB  ODH。QAH。"1input NH)orning 。 or  N)igh も t ーーー ッ > 名" 


MSGBMONG』 DB  ODH。OAH。 OH。" BDDD MORNING! THIS IS FUNCTIUN 9。 7 。ODH。 ONH 。 "を" 
MSGNIGT』 DB  ODH。OAH, QAH。” GBDOD NiGHT! THIS IS FUNCTION 9。 7 。ODH。OAH。 "も" 


END 


い > 


Figure-4.2.2 8080 の サン プル ・ プ ログ ラム の アセ ンプ ブリ ・ ソ ー ス ・ フ ァイル の タイ プア ウト . 


この 8080 用 の ソー ス ・ フ ァイル “FUNC9 . ASM” に 対し , XLT86 を 実行 し , 8086 用 の ソー ス ・ フ ノ 
ァイル が 生成 され る 過程 を 紹介 し ます . 
XLT86 の 実行 例 を 次 に 示し ます . 


XL 「 66 の 使用 例 


コマ ンド ・ ラ イン の [ ] の 中 に 指定 し た 3 つの パラ メー タ は 。 


80…… 生成 され る PRN フ ァイル 中 に 8080 の アセ ン ブ リ ・ リ スト を 作成 する . 
86…… 同じ く PRKN フ ァイル 中 に 8086 用 の ライ ン と ステ ー ト メン ト の リス ト を 作成 する . 
8 … 同じ く PRN フ ァイル 中 に BASIC BLOCK の リス ト を 作成 する . 


と いう 意味 を 持っ て いま す . 


3 つの パパ ラメ ー タ ,「80.r86J「B」 を 指定 (本文 参 昭 ) 
『 
AXLTB6 FUNCBOB6B] 8080 用 ソー ス ・ プ ログ ラム 、*FUNC9.ASM* に 対し て ,XLT86 を 実 . 


XLTB6 Version 1.。1 
CoPyright(c) 1981 以下 の 5 ステ ッ プ が 順次 実行 され て 行く . 
Digita1 Research 
Symbo1 Setup 9060 ソ リース ・ プ ログ ラム の 各 シ ン ポ ル の ロケ ーション 確認 の だめ の ス テッ プ 
Getup Blocksw デー ツタ の 流れ を 分 析 す る だ め の BASIC BLOCK を 決定 する ステ ッ プ . 
Join Blocksm 互い の BASIC BLOCK を 結合 し て *Directed Graph* を 構成 する ステ ッ プ . | 
List Blockw 一 ン ロー 分 析 に よる BASIC BLOCK の オプ ショ ナル な リス ト を 作成 する ステ ッ プ . 
Trans1 a も を w-6 プロー 分 析 に 従 つて , 8080 イ ンス トラ フシ ョ ン を 8086 イ ンス トラ クシ ョ ン に 変換 する ステ ッ プ 
AA> トラ ンス レー ト 終 了 . 


Figure-4.2.3 8080 の ソー スプ ログ ラム “FUNC9 . ASM” に 対す る XLT86 の 実行 例 . 


この よう に , 5 つの ステ ッ プ を 経て トラ ンス レー ト の 作業 が 終了 し まし た . 
生成 され た 各 フ ァイル を DIR で 確認 し て み ま し ょ う . 


A>DIR FUNC。 ま ) -…XLT86 の 実行 に よ つ て 生成 され る 各 フ ァイル の 確認 . 


人 As FUNC QASM 』 FUNC9 PRN 』 FUNC9 AB6 


0 各種 リス ト フ ァイル 生成 され だ 8086 用 ソー ス ・ プ ログ ラ /、 


Figure- 4.2.4 XLT86 の 実行 に より 生成 され た 各 フ ァイル の 確認 . 


80860 用 の ソー ス ・ フ ァイル “FUNC9 . A86′ が 生成 され て いま す . 8080 用 の ソー ス ・ プ ブロ ゲ 芝 よい 
どの よう に 8086 用 の ソー ス ・ デ ログ ラム に トラ ンス レー ト され て いる で し ょ う . "FUNC9 . A86* を タ 
オデ が ト し で 肉 に 示し ます. 


他 の 8bit CPU お よび 16bit ご ビ ピ U の ソフ ト 開 発 


本 JCW 2 
/ arypg FUNC9 。 86/ で き 上 つ だ 8086 用 ソー ス ・ フ ァイル の タイ プア ウト . 1 
NM EQU Byte Ptr OLBX] | 
UI | 
H FUNCTIOUN 9』 PRINT BTRING | 
) オキ | 
DRG 10OH | 
STARTI 
NOV CL 。9 
MDV DX 。(Dffset MSGINP') 
INT 224 
MOV DL 、 4 
INT 224 
| CMP AL 。" M* 
2 MONGQUT | 
CMP AL 。” N" | 
7 NIGTOUT | 
| CMP AL 。 1 AH 4 
| JNZ に 1 
RET | 
し 14 | 
MOV し 、 は | 
MOV DL の" | 
INT 224 | 
JMPS START 
MONBOUT 
MOV CL 。9 | 
MV DX 。 (0Dffswet MSGMONG ) | 
INT 224 | 
JMPS START | 
NIGTDUT』 | 
NOV CL 。 9 | 
MDV DX。( ロ ffset MSGNIGT ) 
INT 224 
JMPS START | 
、 っ EQU 1 | 
DSEG | 
ORG 0ffset L 2 | 
MSGINP DB QODH。OAH。"1input NM)orning = or NMN)iq ロ ht ーーー> 征 * 
MSBMDNG DB ODH。 OAH。 OAH。" BDDD MDRNING! THIS IS FUNCTIDN 9." 。ODH、OAH。" も" 
MSGNIGT DB QDH。OAH。 OAH。' GDOD NIGHT! THIS 1S FUNCTIDN 9." 。ODH。 QAH。" *” 
END 
の ン 
Figure-4.2.5 で き 上 っ た 8086 用 ソー ス ・ フ ァイル の タイ プア プア ウト. 
この ソー ス ・ フ ァイル を CPM の アセ ンプ ブラ “ASM86′ で アセ ン ブ ル す れ ば 良い 訳 で す . 
次 に 。 8080 ソ ー ス ・ プ ログ ラム が , 8086 用 に トラ ンス レー ト さ れる 過程 の 分 析 リ スト な ど が 含ま れる 


PRN フ ァイル *EUNC9 . PRN "の 中 か ら , パ フラ メー タ “~B“" と 86" に 
ト の リス ト を 示し ます . 
デー タ ・ フ ロー の 分 析 に よっ て 適切 に 組み 合わ 


の リス ト と , 8086 用 の ライ ン と ステ ー ト メン 
ここ で 示さ れ て いる それ ぞ れ の BASIC BLOCK が , 


2 お 


よっ て 生成 され た BASIC BLOCK 


だす 基 - で 0F 


B1ock At OOOS (subr ) 。 日 6 = 
Entry Actives 


Biock At O1OO (coge) 。 
Entry ctives 


B1ock At O1OB (code) 。 AB6 = O1Q08 
Entry Activei B-DEHL ムー 


Biock At O1OD (code) 。 AB6 = O1OD 
En モ try active: BCDEHL- 


Biock At O112 (code) 。 AB6 = O114 


Entry Active』 BCDEHL 一 ローーー 


Biock Qt O117 (mubr) 。 AB6 = Q11B 
En も ry activei BCDEHL 人 
191BCDEHL--A0ZSPI !RZ 
Biock at O11A (code) 。 AB6 = Oi2O 


En も ry ct ふ ivei BBーーーHLー ム ーー 


OPCOde 


Biock At O121 (code) 。 AB6 = O127 


BAS1iC 


BLOCKS 


ーーー 「BCDEHL 一 人 一 


ーー Exit 人 Active 


Ex1t nctives 


En モッ y 人 Actives ーーーHLー 和 ーーーーー Ex 1 も AACtives 


1JMP IO1O0! 


B1ock At O124 (code) 。 AB6 = O12a 
En も レッ ct} ソ @: BーーーHLー ム ムー 


C! 


O ! ーーーー 


D!O1SE ! --DEー 一 


1CALL !OOOS ! 


Block At O12C (code) 。 AB6 = O1 さ 2 
En モレ y 人 AcCtive』 BーーーHL- 代 


iJMP !O1OO 


Block At O12F (code) 。 AB6 = O1 さ 5 
En も レッ Ac も ive: BーーーHLー ム n 


Block At O1 さ 7Z (code) 。 AB6 = O1 さ D 
Ent テ レッ Activgs 


B1ockK Qt 01 さ AA (dat ぁ a) 。 AB6 = O14O 
En モレ ry Actives 


】 5 も mt 葵 ! opCode uses 


B1ock も O1AA (code) 。 AB る 


Figure-4.2.6 


BCDEHL 一 人 


BーーーHL ーーー 


ほう ささ 


の り の いひ OOQuD デ ーー 


BCDEHL ADZSPT Exit Activei BCDEHL-A0ZSPI 


E ロ U 


vy2 ! opcode kil1is 


Byte Ptr OBX] 


3111111111111131111111111711T1 


まき FUNCTION 9+* 


PRINT STRINBG 日 


まま まま は は 33133 は は 1111313111111111111111111111111111 


OURG 
STARTi 

POV 
fOV 
INT 
HOV 
INT 
CHP 
JZ 

CMPF 
トル 4 

CMP 
り NZ 
RET 


NOV 
NOV 
INT 
JPS 
ONGOUT* 
NOV 
NOV 
INT 
JNMPS 
NIGTOUT* 


PRN フ ァイル に 含ま れる BASIC BLOCK の リス ト . 


10OH 


CL。9 
DX 。 (0Dffset SGINP) 
224 

CL。 1 

224 

AL。" NM" 

MONGOUT 

AL。" N* 

NIGTOUT 

AL 。 1QH 

公 


CL。 2 
DL。"?* 
224 
START 


CL。9 

DX。 (0Dffset MSGMONG ) 
224 

START 


CL。 マ 
DX。 (0Dffmwet MSBNIGT) 
224 

START 

ロ 


ロ ffset L 2 


XLT66 の 使用 例 


ODH。 OAH。" input 。 MD)orning or N) ふ ght ーーー> を * 


ODH。 OAH。 ORAH," GOOD MORNING' THIS 1S 


FUNCTION 9。" ,。ODH。 OAH 


ODH。 ORH。 ORH。" GDODD NIGHT! THIS 1S FUNCTION 9。" 。ODH, OAH。 


ど と そ 4 


他 の 8blt CPU お よび 16bit CPU の ソフ ト 開 発 


BASIC BLOCK の リス ト 中 の (subr) 0 62065 は メ 才 妥 0 ジ ショー ドッ 0 
届 の タ ・ ブロ ッ ク を 表し ます . ( 

その 他 , XLT86 は , 例え ば CPM-86 の に 5 の: メモ リモ デル 用 の ソー ン . ブ ログ ラム を 
作っ た り , コー ド と デー タ ・ セ グ メ ント を オー バラ ッ プ させ な いよ うに する な ど , いく つか の 指示 を 
XLT86 の 実行 時 に パラ メー タ と し て 与え る こと が で きま す . 
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5 幕 竹 導 為 談 言 若 に よる 
局 一 地 症 ソ フル 応 発 克 


匠 種 高 級 言語 に よる 同一 主題 ソフ ト 開 発 例 


CPM は , 高級 言語 の 分 野 に お いて も , 他 の OS に 比べ 圧倒 的 に 優位 で す . 2 - 3 の 代表 的 な 言 
語 に と ど ま ら ず , いろ いろ な 言語 プロ セッ サ を 使い た い 場 合 、 どう し て も CP/M に 頼ら ざる を 得 な 
い の で す . 

例え ば , 代表 的 な 言語 で ある COBOL で は , ANSI 標準 COBOL (ANSI X3.23 1974) の レベ 
ル II が 走り (CIS COBOL) これ は , プロ フェ ッ シ ョ ナル の プロ グラ マ が 十分 満足 で きる 内 容 で す ( こ 
れ に は 便利 な “COMPUTE” ステ ー ト メン ト も 使用 で きる ). 

また だ , 今 ま で 限ら れ た 機種 で し か 利用 で きず , 使い た く て も 使え な か っ た 人 が 多い APL な ども , 
国内 の 販売 店 で 入手 で きる よう に な り ま し た . CPM 上 で 走る APL を 具体 的 に 紹介 する の は 本 書 
が 最初 と 思い ます が , APL が , CPM マシ ン 上 で 安価 に 誰 も が 利用 で きる と いう こと は , スカ ラー, 
ベク トル ,。 マト リッ クス な どの デー タ 魚 析 , 数 値 解析 。 それ に グラ フィ ックス な どの 分 野 の 人 達 に 大 
き な 刺 激 を 与え る も の と 思わ れ ま す . 


この 章 で は , 一 般 の ユー ザー が , 容易 に 入手 可能 な 言語 を 11 種 類 取 り 上 げ ま し た . そこ で , 簡単 な 
問題 を 全部 の 言語 に 与え , その 間 題 解決 を それ ぞ れ の 言語 で 実現 し て み ま し ょ う . 

取り 上 げた 11 種 類 の 言語 と , その 商品 と メー カー 名 を 次 に 示し ます . 購入 先 な ど は 本 書 の 巻末 付録 
C に 示し て お きま す . 


1 

2 FORTRAN "ババ FORTRAN-80 ( 米 Microsoft 社 ) コン パイ ラ 

3 BASIC いい CB-80 ( 米 Digital Research 社 ) コン パイ ラ 

4 . PASCAL……Pascal ン MT+ ( 米 Digital Research 社 ) コン パイ ラ 

5 PL 1……PL プ I-80 ( 米 Digital Research 社 ) コン パイ ラ 

6 PL ノ M の PLMX ( 米 Systems Consultants 社 ) コン パイ ラ 

7 C……BDS C Compiler ( 米 BD Software 社 ) コン パイ ラ 

8 . FORT 是 …… Rgy FORTH (日 リ ギ キー コー ポレ ーション ) コン パイ ラ 

9 LISP いい muLISP ( 米 The SoftWarehouse 社 ) 中 間 言 語 コ ン パ イラ ブイ ンタ ー プ リタ 


10 . ALGOL OCT ALGOL-M ( 米 Mark Moranville) 中 間 言 語 コ ン パ イ ラグ イン ター プリ タ 
エー ビー エル 
11. APL…… SOFTRONICS APL ヽ 80 ( 米 SOFTRONICS 社 ) イン ター プリ タ 
以上 の 言語 に 対す る 課題 は 次 の よう な も の で す . 
プロ グラ ム 名 は , 「SAMPLE」 と し ます . その 内 容 は , プロ グラ ム を 実行 し た 場合 の 具体 的 な スク 
リー ン 表 示例 で 示し ます . 


フフ 1 


百 種 高級 言語 に よる 同一 主題 ソフ ト 開 発 倒 


A>( ブロ グラ ム 実 行 ) ee 「SAMPLE 」 プ ログ ラム を 起動 する . 


プロ グラ ム が 起動 する と , この プロ グラ ム の 意味 を 表す メッ セー ジ と , 
数 値 m の 入力 を 求め る メッ セー ジ が 出力 され る . 


例え ば 300 を 入力 し た . 


B00) | 
ーーー n の 値 の 条件 , | 一 250 の 範囲 で な い の で 
100 7 受け 付け られ ず , 再び 入力 を 求め る メッ 


入力 され た n の 値 が 入る . 』 セー ジ が 再度 出力 され る . 


1 十 2 十 3 十 …n」 三 ニーX 


input ni(n」 三 に 」 | 


5 二 和 、 
IRO Rm デー に: まま C 二 8) に オキ 


今回 は 100 を 入力 . 条件 に 合致 


| 土 2 二 3 十 …|100= テ 5050 この よう に , 式 と と も に 答え が 出力 され る . 


2 
実行 終了 和え 


つの つまり, た だ の 数 別 の 総和 (時 土 2 二 3 二 …… 十 n ) を 求め る プロ グラ ム で す が , その 中 に は , コ 
ン ソ ー ル と の 入出 力 , 演算 , 判断 の 要素 が 入っ て いま す (入力 が 0 や , 1, 2, 3 の 場合 , 答え の 式 
が お か し いな ど , 細か いこ と に は 目 を つぶ っ て 下さ い ). 

で は , この 課題 「SAMPLE」 を , COBOL か ら 順 に それ ぞ れ の 言語 で 実現 し て 行き まし ょ う . 

ここ で は , これ ら の 言語 と その 使い 方 に つい て の 詳細 な 解説 を 行う の が 目的 で は あり ませ ん . 今 ま 
る 一 部 の ミニ コン ピュ ー タ 年 、 大型 コン ピュ ー タ で し か 使う こと が で き な を か っ な 下谷 の 。 そ の フル 
セッ ト あ る い は サブ セッ トレ ベル の も の が , CPM マシ ン 上 で 簡単 に 使用 で きる と いう 事実 を 紹介 す 
る の が 目的 で す . 

言語 は 本 来 。 それぞれ に 適する 分 野 が あり (PL プ I と か ,。C な ど , アセ ンプ ブラ ・ レ ベル に 近い シス テ 
ム 記 述 か ら 。 ビジ ネス ・ ア プリ ケー ショ ン の 記述 まで , 広く 利用 で きる 言語 も ある が ), それ ぞ れ の 特 
徴 を 生か し た サン プル ・ プ ログ ラム を 作れ ば な お 良い の で す が , ここ で は た だ , 各 言 語 の 書き 方 や , 
雰囲気 を 比較 する 意味 で , 画 一 的 に 取り 扱っ て いる こと を ご 了承 下さ い . 


9).1 COBOL 


5.1.1 COBOL に つい て 


COBOL (Common Business Oriented Language) は , その 名 の 通り 事務 用 共通 言語 で あり , 身近 
な 例 で は , 銀行 の オン ライ ン ・ シ ステ ム や , 各 会 社 の 給与 ・ 人 事 そ の 他 の 会 社 経営 レシ ステ ム な ど , 事 
務 分 野 の 大 半 の も の に 使用 きれ て いま す . “ 

COBOL は , 1959 年 に 事務 用 共通 言語 の 開発 を 目的 と し て 設立 され た 組織 で ある CODASYL (the 
Conference On DAta SYstems Language. コ ダ シ ル ) に よっ て , その 仕様 書 が 作成 され , 1960 年 に 


プン 


COBOL 


一 般 に 公開 され まし た . 

この 仕様 書 に 基づき, 各社 が COBOL コン ノッ パ イラ を 開発 し ,1960 年 末 に は , すでに RCA と UNIVAC 
が 完成 し て 両機 種 開 で 同一 COBOL プ ログ ラム の 互換 性 の 実験 を 行い , 見 事 に 成功 し て いま す . この 
当時 の COBOL は , 現在 COBOL-60 と 呼ば れ て いま す . 

CODASYL と ANSI (アメ リカ 国立 標準 協会 ) と の 関係 は , COBOL 文法 の 開発 を CODASYL が 
行い , その 標準 化 を ANSI が 行う こと に な っ て いま す . 

COBOL は , CODASYL の 管理 に より 常に 保守 改訂 が 行わ れ て お り , 他 の コン ピュ ー タ と の 互換 性 
が 極め て 良い こと は , 他 の 言語 に は な い 最 大 の 特徴 で あり , 投資 効率 の 高い 言語 で ある と 言う こと が 
を きま す 、 

現在 の COBOL の 規格 は , 改訂 アメ リカ 規格 COBOL X3.23-R1974 が 多く 使わ れ て お り , JIS COBOL 
も これ に 準じ て いま す . 

CODASYL の 指示 で , COBOL の マニ ュ ア ル な ど に は , 必ず 次 の 文章 が 書か れ て いま す の で 紹介 し 
た あま も ま ブ 、 


COBOL は 産業 界 の 言語 で , いずれ の 会 社 , 会 社団 体 、, あるいは いか な る 組織 団体 の 所 
有 物 で も な い . 
ぃ いずれ の 参画 者 。CODASYL プロ グラ ミン グ 言 語 委員 会 も この プロ グラ ミン グ ・ シ ス 


テム と 言語 の 正確 性 お よび 機能 に 関し て は , な ん の 保証 も し な いし , 一 切 の 責任 も 負わ 
な い 。 


5.1.2 MICRO FOCUS 社 CIS COBOL に つい て 


CIS COBOL は , Federal High COBOL の GSA 仕様 に 一 致し て お り , CPM マシ ン 上 で (例え 
ば あな た の PC-8001, 8801 で も ) ANSI X3.23 1974 COBOL の , それ も レベ ル II を 使用 する こと が 
で きま す ( 注 : こ こ で 使用 し た CIS COBOL Version 4 .4 は レベ ル II の バー ジョ ン で は あり ませ 
ん ). 

CIS COBOL は , 次 の 8 つの モジ ュー ル を レベ ル II で 完全 に 実行 し ます . 


@ ニ ュー クリ アス (中 核 ) 

@ テー ブル ・ ハ ンド リン グ ( 表 操 作 ) 

@ シー ケン シャ ル 1/O ( 順 フ ァイル ) 
_@ リ ラテ ィ ブ 1 ン O (相対 ファ イル ) 

@ イ ン デ ックス 1/O (索引 ファ イル ) 
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@ イ ンタ ーブログ ラム ・ コ ミュ ニケ ーション (プロ グラ ム 間 連絡 ) 

e ソー ト ・ マ ー ジ (整列 併合 ) 「 

@ る コミュニケー ジョ ジン 才 放 信 )……: だ も ハー ドウ ェ ゲ の ザ ポ ロト が され で V* 雪 と (レポ にょ よ ・ 
ライ タ は な い ). 


また ,。 次 の モジ ュー ル は レベ ル I で 実行 し ます . 


@ セグメンテーション (区 分 化 ) 
@ ラ イブ ラリ (登録 集 ) 
@ デ バッ グ 


夫 の 介 。 ミ ニコ ンピュータ 。 大竹 コ ンピュータ の COREL で は サポ ー ト きれ て いな を ない CROL の 
入出 力 モ ジュ ー ル に 内 蔵 さ れ た だ , 全 画 面 処理 用 の アド バン ス 画 面 形式 と 。 デー タ 入 出力 機能 . カー ソ 
ダイ ルレ ダキ ュー テ セッ シン グ し よる デー クタ 人 出力 欄 態 、 その他 マイ クロ コシ ビ ピュー タダ を 信和 女 に 
活用 する た め の い くつ か の 拡張 機能 が あり ます . 

まだ に 9 GOBUOE に は 、 ユ エ ユーティ リティ と し て MEMS- 2 と いう 。 CB ツー ネス ・ コ ー ド ・ 
ジェ ネ レ ー タ が 用 意 さ きれ て お り ,CRT と 対話 形式 で 非常 に 能率 的 に プロ グラ ム を 作成 する こと が で き 
と - 電 


5.1.9 CIS COBOL に よる 「SAMPLE」 プ ログ ラム の 作成 


居 。 る の ソー ズー プロ グラ ム を 泌 だ 示し ます . 

COBOL に 関し て は , 若干 "SAMPLE” プロ グラ ム の 仕様 と 異な る 箇所 も あり ます が , 大 形 コ ン ピ 
ュー タ で , COBOL の 専門 家 が 書く プロ グラ ム 風 に 書か れ て いま す . も ちろ ん , 主題 プロ グラ ム の 仕 
様 を 満足 する だ け で あれ ば , この 数 分 の 一 の ステ ッ プ 数 で 書く こと が で きま す . 
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| 8 DISPLAY CRT-INPUT-AREA-BET . 
に ャ ACCEPT CRT-INFUT AREA-SET 。 


DATA DIVISIODN。 オプ ジ エフ クト ・ プ ログ ラム に よっ て 処理 され る すべ て の デー タマ を . ここ で 定義 する . 
MORK ING-STDRAGE SECTION.。 ぼ 用 する 変数 は すべ て 定 業 する 
27 < PIC 9(6)V9。 - 独立 項目 と し て い る .01XPIC 9G)V9. で も よい , 
| 1 上 ーー 小数 京 以上 6 桁 , 以下 1 桁 を 定義 . 
| CO ま は 上 RT- 了 ITLE。 
0O さ F1LLER PIC  X(BO) VQLUE 5PACE 。 
03 TITLE-A PIC  X(BO) VALUE “1+2+ さ +。。。。n = xx"。| 
O3 た ILLER PIC  X(BO) VALUE SPA E。 | ーー 
( O ミ CRT-INPUT-TITLE 。 1 
| 05 TITLE-B PIC  X( さ O) VALUE | 0 
| まり いも PD 4D 9 1 は 。、。、250) ーー>0OO" 。 
| OS FILLER PIC  X(5Q) VALUE SPACE. 
| 、 Q5 ERR-CEDMMENT PIC  X(BO) VALUE SPACE. 
| Q さ 。 CRT-ANSMER-AREA。 
Q 呈 CUMMENT-1 PFIC  X(10) ーー 
QO5 INPUT-NOTE PIC ZZ9、- “は 上 の 0 を 表示 し な い . 
| QOS COMMENT-2 PIC  X(2) 、, は 表示 する 桁 で , 編集 項目 で ある . 
| OS ANSMER PC 7277。Z29. 
QOS CUR-SET P1C  X(160)。 FILLER 以 外 の 変数 を 定義 する こと で , 
カー ソル を エリ ア 最 下部 に セッ ト す る . 
O1 CRT-INPUT--AREA-SET REDEFINES CRT-T1ITLE。 
O さ FILLER PC  X(247) 。 
O さ INFUT-DATA PEC 943) 。 
※ 
| PROCEDURE DIVISIDN。 デー 処理 部 . 
| # ネ ネ 。。 INITIQALET \\ ま 
| MOVE ZERO TH Y。 
DISPLAY PACE 。 画面 全体 を フリ ア . 
MDVE SPACE TO CRT-ANSMER-AREA。 答え エリ ア を クリア. 
TITLEDUT-ACCEPT 。 
A-* DISPLAY CRT-TITLE 。-- 初期 画面 表示 . 


ー 和 を こ に カー ソル を ビ ツ ト .、 
チー ダ ハン 


TO ERR-COIENT 
TO _ COMIMENT-1 答え エリ ア の 表示 内 容 の セッ ト . 
TO INPUT-NOTE | 入力 値 が 正しい 時 . 

TO COMMENT-2 

ーーーー> RETRY PLEASE " 


TO ERR-COMMENT , 入力 値 エ ラー の 時 . 


ネネ ネー し じ HECK DRTAN  ※ ま ※ 
IF INFUT-DATA < 251 
THEN MOVE SPACE 
| た ルキ さ も うす 。、、。、。 
| MOUVE INFUT-DATA 
MOUVE LU = 
ELSE MOVE "INPUT ERROR 
GOU TU TITLEOUT--ACCEPT。 
KK ま ※ 。 CUMPUTE  # ま まま 


QADD 1 INFUT-DATA 

MULTIPLY O.5 BY X. 

MULTIPLY X 
D〒 DISPLAY CRT-TITLE。 


STOUP RUN。. 


Figure-5.1.1 


| 
BY INPUT-DATA BIVING ANBMER。 | ー 
ーー 細 面 全体 (今回 は , 答え エリ ア に 内 容 が 入 つ て いる ) を 表示 . 


TO X、 - 
n ま で の 総和 の 計 


ーー シャ ッッ ッッ ャ ュー ニュ ーー 


COBOL に よる SAMPLE” の ソー ス ・ プ ログ ラム 、. 


CIS COBOL の ソー ス ・ フ ァイル 名 の エク ステ ンション は 。 任意 の も の で か まい ませ ん . 


ンジ ら 


台 橿 高級 言語 に よる 同一 主題 ソフ ト 開 発 例 


ここ で は In まで の 総和 の 計算 を ,、 ルー プ を 使わ ず , 
((n 十 1)X0.5)n= ニ x 


と いう 式 で 求め て いま す . 


スク リー ン へ の 表示 は , CRT 全体 を 各 変 数 で 分 割 し て 表示 位置 を セッ ト し て いま す . その 変数 と CRT 
の 関係 を 次 に 示し ます (この よう な 手法 を 用 い ず に , も っ と 簡単 に 表示 で きま す が ). 


(CRT 一 TITLE)…CRT 全体 の 名 前 . 


⑳ て で 入力 用 コメ ント 表示 の 
内 容 を , 初期 値 と し て 持つ . 
| 行 は 80 文 字 に 分 割 . 


を 実行 する こと に より , この 位置 に 
カー ソル が セッ ト さ れる . 

⑥ を 実行 する こと に より , 3 桁 の 数 字 
GSR を INPUT 一 DATA か ら 受 け と る . 


フー の 時 , コメ : れる . 


計算 結果 を 表示 する エリ ア 
@ を 定め る . 

の 時 は , 全体 に スペ ー ス を 
セッ ト す る . 


Figure-5.1.2 CRT 全 体 を 各 変 数 で 分 割 し た 図 


も 本村 こ の ソー 式 * ブ ログラム SAMPLE . CDE わき ン テ 0 まま 


コン パイ ル し て ,。 そ の プ ブログ ラム を 実行 する た め に 必要 な 最低 限 の 各 フ ァイル を , STAT コマ ンド 
で 示し て お きま す (も ちろ ん CIS COBOE の パッ ケー ジ に 含ま れ で いま す ). 


Figure-5.1.3 CIS COBOL の コン パイ ル と プロ グラ ム の 実行 の た め に , 最低 限 必要 な 各 フ ァイル . 
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コン パイ ラ の 実行 と , 生成 され た ファ イル の 確認 な どの 実行 例 を 次 に 示し ます . 


Q>DIR SAHPLE。 ま ) コン バイ ル 前 の "SAMPLE” フ ァイル を すべ て リス ト ア ウト . 


Qi SAMFPLE に ゾ ソース ・ フ ァイル の み 人 存在 する . 
QA>CUBOL SAMPLE.CBL / ソー ス ・ フ ァイル SAMPLE.CBL* に 対し , コン パイ ラ を 実行 する . 


** じ CIS COBOL ソ 4.4 CUPYRIGHT (C〉) 1978。1981 MICROD FOCUS LTD 
*#*COUMPTILING SAMPLE. CBL 


*# ERROURS=QOQOQQ DATA=OO977 CODE=QOO30 さ DICT=OO さ ささ 』 0O9126/0O9459 BSA FLAGS= OFF 
上 フー な し で コン パイ ル 太 め . 


A>DIR SAMPLE。*) コンパ イル 終了 後 , す べ て の *SAMPLE* フ ァイル を リス ト ア ウト . 

szs SANFLE じ BL 』 SAHPLE INT 。 SAMPLE  LST INT フ ァイル と LST フ ァイル が 
ソー ズン アイ ル 中 間 コ ー ド ・ フ ァイル リス ト ・ フ ァイル . 生成 され て いる . 

A>BsSTAT SAMPLE。.INT/ 中間 コ ー ド ・ フ ァイル の 容量 を 調べ る . 


RECS BYTES EXT ACC 
1 1 2 に 1 R/M AsSAMPLE.INT 2K バ イト 長 で ある . 
BYTES REMAINING ON az 1 さ 1k 


人 > 


Figure-5.1.4 CIS COBOL の コン パイ ラ の 実行 と , 生成 され た ファ イル の 確認 . 


コン パパ イル は 成功 し て ,。 2 氏 バ イト の 中 間 コ ー ド の ファ イル “SAMPLE . INT′ と ,。 リス ト ・ フ ァ 
イル SAMPLE . LST” が 生成 され て いま す . 

で は ば SAMPLE ブロ グラ ム を 寄 行 し て み ま し ょ う 、。 中 間 コ ー ド の デ ロ グ を ラシャ タイ た ・ シ 
スチ UN CDM" で て 実行 し ます. 


A>RUN SAMPLE . INT ) - コンパ バイル され だ いい SAMPLE* プ ログ ラム の 実行. 


ラン タイ ム ・ シ ステ ム を 起動 し て 実行 させ る . 


Figure-5.1.5 CIS COBOL で 作成 され た “SAMPLE" プロ グラ ム の 実行 . 


ラフ ランタ イム ・ シ ステ ム と , 中 間 コ ー ド ・ フ ァイル が メモ リ 上 に ロー ド さ れる と 実行 開始 と な り , ス 
クリ ー ン 全体 が クリ ア さ れ て 。 次 の よう に 表示 きれ ます 。 


/ 1+2+3+。。。。n = x この 位置 に カー ソル が 戻る . 「 

と 
1nput n (n = 1。.。。25O) ー- 湯 Do) ーー251 以 上 を 入力 し だ だ ため, エラ ー・ メ ツ セ ー ジ [ 
INPUT ERROR !  ----> RETRY PLEASE が 出力 され て , 元 の 位置 に カー ソル が 戻 つ だ . 


Figure-5.1.6 "SAMPLE” ブロ グラ ム の 実行 の. 入力 値 エ ラー の 例 (エラ ー・ メ ッ セ ー ジ が 出力 され 
る 点 は , 仕様 と 異な り ま す ). 


フフ ブー プ 


吾 種 高級 言語 に よる 同一 主題 ソフ ト 開 発 例 


前 の り リスト の “300” を “100” と 書き 換え て 実行 する と , 決 の よう に な り ま し た . 


#+ ャ フォ さす 。。。。 ヒコ X 


4 DDM も nn ( ロ = 1。。。25O) ーー テ > は 1OO/ - 適正 な 値 を 入力 . 


1 +2+ さ +。。。。1OO = 5。OS5o - 入力 値 と 答え が 出力 さむ て いる . 


う CP _M に 戻 つ だ . 


Figure-5.1.7 SAMPLE" ブロ グラ ム の 実行 ②. 適正 な 入力 値 の 例 . 


参考 まで に , コン パイ ル 時 に 生成 され た リス ト ・ フ ァイル の “SAMPLE . LST” の 一 部 を 次 に 示し 
て お きま す . 


/ 人 A>TYPE SANPLE.LST / 


%% じ CIS COUBOL V4.4 SAHMFPLE . CBL PAGE』 OOO1 
る 1 
* 。 CIG COUBOL sample program-for "ApDpD11Cation CFP/M" 。 * 
QO11 昌 
011 昌 
IDENTIFICATION DIVISION. O11 昌 
PROGRANM-iD。 SANF'LE . O118 
RUTHOR . Mr . 1URASE . ( 011 昌 
DATE-MRITTEN。 B/2 さ / 1982 O118 
DATE-COMPILED . 日 /23/ 198B2 O1 1 日 
旨 
ENVIRONMENT DIVISION。 O11 昌 
SOUURCE-CUMPUTER . PC ビーBBQO1wi thCPN O11 昌 
0BJECT-COUMPUTER. PC-8 ヨ O1withCPN。 Q118 
SPECIAL-ーNQMES 。 CUNSULE 1 CRT。 Q11 昌 
DATA DIVISION-. Q118 
MOURK ING-STURAGE SECT TION. O184 
た メ 和睦 だ 3 に じ 人 ツ ( ム 6) ソサ 。 Q184 QQO 
し 1 
0 し RT-F! し に 。 O1BB OZ 
0 うる FILLER PIC  X(BO) VALUE SPACE . O1BBE O7 
O③ TITLEー 人 An PIC  X(8O) VALUE "1 て 2+ ィ さて 。。。。n ロ デー %“。 O1DB 5Z 
まま 。 CUMPUTE ネネ ※ 
QDD 1 INPUT-DATA ます え 。 QOE 1 
MULTIPLY O.5 BY X。 OOC6 
MULTIPLY X BY INPUT-DATA GIVING CGNGMEKR . QQD5 
DISPLAY CRT-TITLE。 _ OOEB 
O1OB 
STOUF RUN 。. O1OB 
** CIS COBODL V4.4 REVISIODN 1 URN QV/QOO1 / BK 


** CUMFPILER CUPYRIGHT (C) 1978B。1981 MICROU FOCUS LTD 
*#* ERRURS=OQOQQOO DATA=OO977 CODE=OO さ Q さ DICT=OO さ ささ 』09126/09459 GSA FLAGBS= OFF 


Figure-5.1.8 コン パイ ル 時 に 生成 され た リス ト ・ フ ァイル の 一 部 を タイ プア ウト . 


と アコ ニ 


FORTRAN 


CIS COBOL の その 他 多 く の 機 能 の 紹介 は 省略 し ます . 


9.2 FORTRAN 


9.2.1 FORTRAN に つい て 


FORTRAN (FORmula TRANslator) は , 科学 技術 計算 用 の 言語 で あり , 1958 年 に IBM が 改訂 
版 の FORTRAN II を 発表 し .、 その コン パイ ラ が 作ら れ て か ら 一 般 に 広く 普及 し 始め まし た . その 後 , 
1962 年 に FORTRANIV と その コン パイ ラ が 発表 きれ , これ が 現在 の 標準 化 さ れ た ANSI FORTRAN 
の 基 と な っ て いま す . 

日 本 の JIS FORTRAN の 最高 水準 7000 は , ANSI の FORTRAN に 準じ て いま す . 

FORTRAN は , な ぜ か 日 本 で は 非常 に も て は や され て いる 言語 で あり , COBOL に 次 いで 多く 使 
われ て いま す . 「 

プロ グラ ム の 書き 方 は , BASIC 言語 に よく 似 て いる の で (BASIC が FORTRAN に 似 て いる の 
で ある が ), BASIC 言語 の 書け る 人 な ら 少 し の 学習 で FORTRAN が 書け る よう に な る で し ょ う . 


9.2.2 Microsoft 社 FORTRAN-80 に つい て 


FORTRAN-80 は ,、 ほぼ , JIS FORTRAN の 水 稚 7000 を 満た し て ぃ い ます が , いく つか の 拡張 機能 と 
制約 事項 が あり , それ を 次 に 示し ます . 


FORTRAN JIS 水準 7000 の 上 に 拡張 され た 機能 . 

(1) STOP 文 , PAUSE 文 に \STOP C′ また は "PAUSE C′ と C が 使用 まれ る と き に ,C は 6 
文字 の ASCII コー ド が 使用 で きる . 

(2) READ 文 も し く は WRITE 文 の 中 に , ERR= お よび END= と 書い て 入出 力 時 エラ ー が 発生 し 
た と き ,。 お よび 入出 力 時 の ファ イル が 終了 し た と き の 分 岐 を 書く こと が で きる . 

(3) PEEK, POKE, INP お よび OUT 機能 が 付け 加え られ て いる . 

(4) 文 関数 で 添字 の つい た 変数 を 使う こと が で きる . 

(5) 整定 数 が 使用 で きる と ころ で は , 16 進 数 も 使用 で きる . 

(6) 文字 デー タ の 列 (アポ スト ロフ ィ で くく られ た 文字 ) が nH の 形 の 代わ り に 使用 で きる . 

(7) 文字 デー タ は , 整定 数 と し て の 式 の 中 で 使用 する こと が で きる . 

(8) 継続 行 の 数 に 制約 は な い . 

(9) 各種 の 型 デ ゲー タ を 式 の 中 , また は 代入 文 に 用 いる こと が で きる . また 変換 は 自動 的 に 行わ れる . 
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FORTRAN JIS 水準 7000 に 対し て 次 の 制約 が あり ます . 


(1) 複素 数 型 の デー タ が 使用 で き な い . 
(2) 宣言 文 は 。 つ ぎの 順序 に な っ て いな けれ ば な ら な い . 
@ PROGRAM 文 。 SUBROUTINE 文 , FUNCTION 文 , BLOCK DATA 文 
@ 宮 吉 言 文 、EXTERNAL 文 , DIMENSION 文 
@COMMON 文 
@EQOUIVALENCE 文 
@DATA 文 
@ 文 関数 
(3) デー タ の 型 に 応じ し て コン ピュ ー タ の メモ リ を 占め る 大 き さ が 異な る . 整数 実数 , 倍 精 度 実数 
お よび 論理 型 に 応じ て 必要 な メモ リ の 谷 量 が 異な る . 
(4) 代入 文 に お ける 待 号 お よび DO 文 の 最初 の コン マ は , その 文 の 開始 行 に 現れ な けれ ば な ら な い . 
(5) 入出 力 並 び の 要素 と し て , 複数 個 の デー タ を か っ こ で くく っ た 形 は 使用 で き な い . 


FORTRAN-80 は , FORTRAN で 書か れ た ソー ス ・ フ ァイル (ファ イル 名 の エク ステ ンション は "FOR") 
あつ ン メ まる) し も 。 リロ ター ダグ ル ・ キ デジ ェクト ファ イル (マイ タウ ソト ヽ ・ り 全 か ケー タ ア 北 ・ オ 
プ ジ ェ クト ・ フ フォー マット . エ クス テン ショ ン は “REL”) を 生成 する コン パイ ラ で す . 生成 され た REL 
ファ イル は , 付属 の LINK-80 (リン ク ・ ロ ー ダ ) に より , FORTRAN の ライ ブラ リ と の リン ク グ , そ 
れ に アセ ンプ ラ や や 他 の 言語 に よる REL ファ イル と の リン ク を 行う こと が で きま す . 


5.2.3 FORTRAN-80 に よる 「SAMPLE」 プ ログ ラム の 作成 


まず 。 ソ キ ス ーブログ 取 を 作 に 示し ます , 


30 


FORTRAN 


7 


ネ * じ OmDut@ 
NUMNB = N 
TEMP = N 
20 NUME = NUMB - 1 | の て の 二 邊 の 半 業 
IF (NUMB .EQ。 OQ) GO TO 39O 
TEMP = TEMF + NUMB 
SU TO 2Q 


む ま ※ 人 nM Out 
さ O MRITE (1。 400) N。 TEMF | 。 
400 FORMAT (1H 。 10H1+24 さ +。.。。。 16。 さ H = 。 0//) 2 2 ID 
STOP 
END 


Figure-5.2.1 FORTRAN に よる “SAMPLE” プロ グラ ム の ソー ス ・ フ ァイル . 


ノ ソース ・ プ ログ ラム を コン パイ ル し て , FORTRAN の ライ ブラ リ と リン ク し . 実行 可能 な オブ ジェ 
クト ・ フ ァイル を 生成 する に は 。 最低 限 , 人 次 に 示す ファ イル が 必要 で す (も ちろ ん FORTRAN-80 の 
マッ ゲー と 村 本 まそ て ゆい ます ) 


>EBsGTRT #* ま 。*/ 


Recss Byte5s Ext ム Acc 


<1 さ 27 ド 2 R/M AgFBO。CON 
207 26 に 2 ド R/M AgFURLIB.REL. 

B4 11 に 1 R/M asLBO.COM 
- 、 財 1k 1 R/M aiSAMPLE . FOR 


Bytes Remaininqg Un az 176k 


A> ーー 2 


Figure-5.2.2 FORTRAN-80 の コン パイ ルー リン クー 実行 に 必要 な 最低 限 の 各 フ ァイル . 


で は , コン パイ ル の 作業 を 始め まし ょ う . 各 時 点 で の DIR コマ ンド に よる “SAMPLE” ファ イル 
の 確認 を し な が ら , コン パイ ラ の 実行 と リン ク ・ ロ ー ダ の 実行 例 を 次 に 示し ます . 


QA>DIR SMPLE .*/ 


QRs SAMPLE FOR "SAMPLE” フ ァイル は , ソー ス ・ フ ァイル の み 店 在 . 


A>FBO_SAMPLE 。 SAMPLE=SAMPLE ) コン / イラ の 実行 . 標準 的 な コマ ンド コー イン て あり . 


REL フ イル と , PRN フ ライル を ディ スク 上 に 生成 する . 
* ま MATIN 


>DIR SQMPLE.*/ "生成 され ね だ ファ イル の 確認 . 


ンコ 1 
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ns SAHFLE FOR 』 SAMPLE PRN 』 SANMFLE REL 
ジー スム ノア イル リス ト ・ フ ァイル リロ ケー マフ ブル. オプ ジェ エフ ト ・ ノ ファ イル 「 
。- 終了 と 同時 に CPM に 戻る . 
QA>LBO SANFLE/E。SAMPLE/N/ リン ク ・ ロ ー ダ の 実行 . 標準 的 な コマ ンド ・ ラ イン で あり の ,COM フ ァイル が 
生成 ざさ れる *COM* フ ァイル を ディ スグ に セー ブ す る . ディ スク 上 に 生成 され , 終了 後 は CP ^M に 戻る . 
Link-BO さ .44  QO9-Dec- 日 1 Copyriqght (c) 198B1 Mi1CrO5 ロ ft 


Data O10O さ 1B74 く 6769 > 


24 ヨ 19 Bytes Fre@e 
EO16F 1B74 さん 』 


A>DIR SAMPLE.W) 生成 され だ ファ イル の 確 凍 . 


As SAMPLE FOR = SAMPLE PRN : SAMPLE REL 』 SAMPLE CON 
実行 可能 な 純 マ シン ・ コ ー ド の ファ イル が 


生成 され て いる . 
A>BsSTAT SAMFLE .CODM ) ・ SAMPLE.COM" の 
容量 の 人 確 和 . 
RECS BYTES EXT ACC 
. 語 る 7 に 1 R/M asSQMFLE.COUM 7K バ イト 長 で ある . 
BYTES REMAINING ODN Ai 164 に 


人 Q > 


Figure-5.2.3 FORTRAN-80 に よる コン パイ ラ の 実行 、 リ ンク ・ ロ ー ダ の 実行 と 生成 され る ファ イル の 
確認 、 


で き 上 っ た “SAMPLE . COM” を 実行 し て み ま し ょ う . FORTRAN-80 は コン パイ ラフ な の で , 
*SAMPLE . COM” 単独 で 実行 で きま す . 


1 + ャ フィ さ +。。。。n デー X 

1nDut n (n = 1。.-.2SO ) ーー>29Q7 254 以上 の だ め 入 力 エ ラー と な る . 
input n (n = 1。。..25O ) ーー >2OO ) 再度 正しい 値 を 入力 . 

1 +2+ ス +。。。 < 20O = 2O1OO - 入力 し た 値 と 答え が 出 作 ざれ だ . 


STOP FORTRAN-80 の シス テム ガ ら の 出力 . 


谷 > 
ーー - ゾー スズ 


Figure-5 .2 .4 FORTRAN-80 で 作成 され た SAMPLE” プロ グラ ム の 実行 . 


参考 まで に 。 リ スト ・ フ ァイル の SAMPLE . PRN” の 一 部 を 次 に 示し て お きま す . 


の an>TYPE SANFLE . PRN / 


FORTRAN- ヨ O Ver. さ .44 Copyright 197 ヨ コー-1981 (C) By 1 と と 〇 Of て 一 一 Bytesss 167966 
Createdz 1O-Dec- 日 1 
1 じ FDRTRAN-BO samp1e prOgram fOr "APDP11Cat1On に た / 村 だ 


1 コイ 


INVd1dHO ヨ 


を ま | 欧 早 交 計 の 殿 鈴 の > 多 の 胃 の を の 208-NVLAO』 


する と ル を 演 紀 一 の 14/ と イス /・ 1 と (マサ せ ミ 知事 7 穫 47 と >< ズ と 9 6 9-9Jn 引 ゴ 
くり 

1 

n 旨 セ OO ]QO ャ z 16OO OS 

。 コ 90O oO と ョ セ セ OO JoOQ< nrO と OO ~OoZ 
< と TOO ィ O1 w/QOG コ oot <9QOOO ]$ も 
* 紀 {9 ロ 6 ゴ 

ぃ リセ OO ooOTtO ミユ n ら 6 セ OO と OoOoOoo 上 

s 呈 OOO に EE sn SOO() HLIT1N s【OOO N 
3 上 3 1 ロモ エコ BA ハ 

1 まま ン 当 欠 QN$ 

4【 1 1INI ま O【I* 

: 口 ら つけ 紀 4 紀 過 各 人 けり エ ユ ロロ ロロ 避 

呈 ヨ 3 人 日 (BOT ) コウ OO=H1DuUa ゴ コ で コリ “1 

ほら ユ へ (日 1 ) BHOO=H1bug ゴ コ + ユ TU ゅ MeJBO コ 4d 

QO QO OO 1QO < ヤ ヨ OO 1 る る る る 1 

OO と OOOQ 選 < ヨ OO 1 も るる 91 

QN ヨ 6 乙 

1 ロ $ TVJ 。 ヨ 9OO 率 率 束 率 

d ロ 18 日 

QN* TVJ 財 - に 】96) も も る る 6 1 

6] Tu9dJ <GUOO 1 る る る る 1 

SO* 1 AM < ぶり OO 素 束 束 束 率 

[OO OO QO TO0]* すす 。OUOO ト も る る 6 1 

N*q 1 X] zd6QO 1$ 8 る 91 

dM ヨ 1 " ロ 1 X ゴ ] : り 6OO 氷 束 束 束 

(//G1 0 テ HS の エド この "54 ミ + 選 +THOT “ HT) 1VMMHOD ゴ OO / み 
と MM を TudJ BIOO も も る も 661 

LoOO_ OO OO 【O1*H 1 X コ GtOO 素 氷 氷 率 京 

] コ Qoo と *d 1 X] 1QO 東京 束 束 束 

(QOZ “*T) ヨ 1LIJM O1 tt 

1 つ ほ HH コ DUB ndUt へ 紀 4 “ う nO 85G55S ら ゆ ユ ロ ロロ 1 率 京 1 OI 
コ ら 

QN$ を Tu9J 。 ヨ OOQO 衣 氷 率 京 京 

(/X = ニーロ """"+ ぐ で + 選 +THGT “ HT) 1V9MHO ゴ OO1 軸 

と 際 TUMdJ x コ OOQO 東 氷 京 束 束 

EQOO_ OO QQO 1O1] *H IX ゴ ] z6OQQ 衣 氷 率 京 束 

コ oOOt 『d 1 X ゴ 軸 -7e1616) 素 束 束 束 束 

LINI ま ま dMF z ぶ OOO 1 る る る る 1 

まま 事 『 晶 1 X ゴ ] 。OQOOO 束 束 束 束 束 

(OOT “1T) ヨ 1IMNM Z 

+nO 1]1T1 ※ ネ ポ < 9 

コ ら 

dM ヨ 1 "LMITIN "N ヨ 9 ヨ LNI ヤ 

コー ゞ 

コ と 
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5.9 BASIC 


5.3.1 BASIC に つい て 


BASIC は , も う 言 わ ず と 知れ た BASIC で あり , パソ ュ コン =BASIC, 世の中 の コン ピュ ー タ は す 
べ て BASIC, と 思い 込ん で し まっ て いる 人 も いる くら いで あり , それ ほど 普及 し て いる 言語 で す . 

BASIC の 名 は , 一 説 に よる と Beginner's All-purpose Symbolic Instruction Code に 由来 する と 
言わ れ て いま す が 。 筆者 個人 的 に は た だ , 「 基 礎 の 」 と か 「 初 歩 の 」 と いっ た 意味 で の basic を と っ 
た も の で ある 方 が "BASIC′ らし い の で は な いか と 思っ て いま す . 

BASIC は , 米国 Dartmouth 大 学 の J. G. Kemeny と , TE. Kurtz を 中 心 に 開発 され た , 会 話 型 
の プロ グラ ミン グ 言 語 で あり , FORTRAN に 非常 に よく 似 て いま す . 一 般 に 使わ れ 始 め た の は , 1965 
年 に GE235 シ ステ ム に イン プリ メン ト さ れ て か ら で あ る と 言わ れ て いま す . 

開発 当初 は 。 大 型 マ シン の TSS で 使用 する 目的 で あっ た の で す が , マイ クロ コン ピュ ー タ の 段 睦 
的 な 発達 の お か げ で , 今 で は 各 家 庭 や オフ ィ ス の パー ソナ ル ・ コ ンピュータ で 主 に 合用 され て お り , 
言語 の 機能 も 。 当初 の スー パー・ ス ー パ ー・ セ ッ ト と 言え る ほど 拡張 され て いま す . 

BASIC の コン パイ ラ は ,。 マイ クロ コン ピュ ー タ 用 の も の が 実現 され て お り , BASIC も 実務 レベ ル 
で 本 格 的 に 利用 で きる よう に な り ま し た . コン パイ ラ 型 BASIC に つい て は , 本 書 3 . 4 草 で マイ クロ 
ソフ ト 社 の “BASCOM” を ,。 当 項 で デジ タル リサ ー チ ナチ 社 の “CB-80*” を 取り 上 げ て いま す . 


5.3.2 Digital Research 社 CB-8O に つい て 


(CB-80 は Compiler System 社 の 製品 で ある が , 1981 年 秋 に 同社 は Digital Research 社 と 合併 し た ) 

CB-80 は ,. アメ リカ で ビジ ネス ・ ユ ー ス と し て 最も 広く 使用 3 され て いる CBASIC (Digital Kesearch 
社 . 事務 用 の 中 間 コ ー ド ・ イ ンタ ー プ リタ 型 BASIC) と ソー ス ・ フ ァイル の コ ン パ チビ リティ を 持っ 
た 。 BASIC コン パイ ラ で す . 

CB-80 は ,。 CB-80 コ ン パ イラ と ライ ブラ リ , それ に リン ク ・ ロ ー ダ か ら 構 成 さ れ , BASIC 言語 の ソン 
ー ス ・ プ ログ ラム を ,。 マシ ン ・ コ ー ド の リロ ケー ブル ・ オ プ ブ ジ ェクト ・ モ ジュ ー ル に コン パイ ル し ま 
、 す .。 生成 され た リロ ケー タブ ル ・ オ ブ ジ ェクト ・ モ ジュ ー ル は 。 リン ク ・ ロ ー ダ に より , CB-80 の ライ 
プラ リ ・ モ ジュ ー ル や , 必要 で あれ ば 他 の 言語 か ら 生成 さ れ た モジ ュー ル と の 結合 を 行い , 実行 可能 
な 1 本 の マシ ン ・ コ ー ド プロ グラ ム を 生成 し ます . | | 

CB-80 は , 従来 の BASIC に は な い , 数 々 の 特徴 を 持っ て いま す . 


ンコ 4 


BASIC 


$ ライ ン No を 一 切 必要 と し な い . GOTO お よび GOSUB に は ラベ ル を 使用 で きる (ライ ン No を 付 
け て も か まわ な い が ). 

- 伯 従来 1 行 に 記述 し な けれ ば な ら な か っ た も の が , 複数 行 に わた っ て 記述 で きる . よっ て , 複数 
行 に わた る 関数 も 自由 に 定義 で きる . 

@ リ ロケ ー タ ブル ・ マ クロ ・ ア セン プラ で 使用 する も の と 同 じ 機 能 を 持つ コッ の 還 
3 章 参 照 ) 宣言 を , 他 の モジ ュー ル に 対し て 行え る . 

@$ フ ァイル の ラン ダム ・ ア クセ ス の 手続 が 簡単 で ある . 数 値 を 文字 列 に 変換 する 必要 が な い . 

@ 6INCLUDE 文 に より , 別 の ソー ス ・ フ ァ イ ル を 任意 の 場所 に 挿入 し な が ら シン ペ オ ルプ こ 
と が で きる . 

@ その 他 い くつ か あり ます が 省略 . 


な ど で あ り , 何と 言っ て も 最大 の 利点 は ,、 アセ ンプ ブラ 言語 を 記述 する 感覚 で , BASIC 言語 を 記述 で き 
る と いう こと で し ょ う . その た め , 構造 化 デ ログ ラミ ング が 格段 に 行い や すく な っ て いま す . 
人 徒 来 の ライ ン No 付 き の BASIC で は , と て も 書け な か っ た り , 書く 〈 気 に は な れ な か っ た プロ グラ ム 
で も , CB-80 の 記述 法 で な ら 可 能 と な る も の が 多い と 思わ れ ま す . 
注 ) 巻末 の 付録 B に , CBASIC, CB-80, MBASIC」。 それ に BASCOM の ステ ー ト メン ト お よ び 
関数 の 一 覧 表 を 載せ て あり ます . 参照 下さ い . [ | 


9.9.9 CB-B8O に よる 「SAMPLE」 プ ログ ラム の 作成 


まず , その ソー ス ・ プ ログ ラム を 示し ます . ファ イル 名 の エク ステ ンション は 。 "BAS* が デフ ォ ー 
ルト と し て 指定 され て いま す が , 何で あっ て も 構い ませ ん . 


つら 


吾 種 高級 言語 に よる 同一 主題 ソフ ト 開 発 例 


PRINT 1 + フ つ + ォ ミ + 。 LR 3 2 き INF ソ AL H see H 人 NSX 
STO ロ FP \program Fun mnd ーー ブロ グラ ム の 実行 の 終わ り は END で は な ぐ STOP. “ 


学 こ きら 1C ちら いわ Out 上 ュ 1 ロ @ 


P= INFVAL+1 
NSX= P * 〇 5 * INPVAL 
RETURN 
学 し 1 st en ロゴ 。 
人 ム > / 
Figure-5.3.1 BASIC コン パイ ラ CB-80 で 書い た “SAMPLE′ プロ グラ ム の ソー ス ・ フ ァイル . 


ェ ょ の ゾ ジーズ ・ ブ ログ ダグラム を コン パイル し 。 ラ ンタ イム ・ ラ イブ テラ サリ を サリ ンク し て で 実 村 す る に は 。 し B 
-80 の パッ ケー ジ の 中 か ら 。 最低 限 次 の 各 フ ァイル が 必要 で す . それ ら を STAT コマ ンド で 次 に 示し 
ます 、 


1 R/M ACBBO. CO0M コン パイ ラ の ルー ト ・ プ ログ ラム . 
1 R/M AsCBBO。 ロ V1 
1 R/M ACBBQO。0V2 コン パイ ラ の オー バレ ー イ . 

1 R/M siCBBO . ロ ソ ミ 

2 R/M ACB60O。IRL ラン ツイ ムラ イフ ラリ 

1 R/M AsLKBO。CDM リン ローダ . 

1 R/M SQMPLE.BAS *SAMPLE* の ソー ス ・ プ ログ ラム . 
Bytes Remaining Un is 16 ふ k 


テン 


Figure-5.3.2 CB-80 の コン パイ ルー リン ク 一 実行 に 必要 な 最低 限 の 各 フ ァイル . 


で は , コン パイ ラ を 実行 し ます . ソー ス ・ フ ァイル 名 の エク ステ ンション が `BAS* の 場合 は BAS? 
を 省略 で きま す が , "BAS/ 以外 の 場合 は 、 フル ネー ム で ソー ス ・ フ ァイル 名 を 指定 し ます . 


パー ニーーーーーーーーーー…ーーーーーーーーーーーー シ ーー ワシ ーー シー ワー ワー 


グ 


/ ADIR SAMPLE.*) ^*SAMPLE* に 関す る ファ イル を 調べ る . 


ns SANFPLE BAS ソー ス ・ フ ァイル の み 人 存在 し て いる . 


A>CBBO SAMPLEES]) ソー ス ・ フ ァイル "SAMPLE. BAS" を コン バイ ル . 

* ヾ [S]/ に より の, REL フ ァイル 中 に シン ボル ・ ロ ケー ショ ン 情 報 を 人 め る . 
CBBO Version 1. さ Seria1 No。 O72ーQOOQOO_ COPYyr1g ロ ht (C) 
19 コ 1 Digita}1 Res ら a レ と Ch。 InC。 人 Q11 ri1 ロ ht と G5 ら 上 ソ ツ ed 


BASIC 


end of pass 1 コン バイ ラ 実 行 中 の 各 パ ス が 表示 され , リス ト ・ フ ァイル が コン ソー ル に 出力 され る . 
nd O† 口 a 第 呈 2 
1s OOSch 党 CB ローBOQ sample proOqgram for "DDpD11iCation CP/M" 学 
23 OOSch 
さ 』。 OO5ch 
43 QOS5ch INTEBER 1 。H。Q 
Ss OOS5ch 
6』  QQO5ch 学 1 ロロ い 七 m 己 らら 8 ロ 与 ロキ 
7s OOSch PRINT 
日: QOSfh PRINT ます あま る 、。。。 の 
3 OOQO6Sh INP . MSGOUT s 
1Os  QOQO65h INFUT AE PD 4 の D NN 1。、。。、 つ 50) ーー〉>" 』 INPVAL 
11s OO フ 7Z6 ム 6h 』F (INPVAL く 1) OR (INPUAL >250 ) 笠 
412 OO ラブ ア h THEN GUT0O INP.MSGOUT 
1 ふる 。  QO9ah 
14』  QOah COmDut@ 
15』。 OOQ9ah GUHSUB CALC. SUIE 
16s OOQOdh 
173。 OOdh 学 ロ いも 上 と 5 い ぃ 1 キ 上 
1 フ Hs OOdh PRINT 
19: OOQOaQh PRINT ミミ サブ + オ さす を 。。。。“ 』 INPVAL 』 "= 「 j ANSX 
20s  QQbeh 
21』 OObeh STOP DrOdram Fun ロロ 
223。 OQQObeh 
ぞ さ 』 OOc1h 
24』。 OOc1ih 学 て a1C SuDFO ロ ut は 1n@ 
25s』 OOcih CALC.SUBs 
26』 。 OOQOc1h F= INPVQAL+1 
27s OOQd さ h NSX= P #* Q。5 * INFVAL 
Zs OOe8Bh RE TURN 
2 り 9:』。 OOech 
ささ Os OOech \ し ist end。 
己 h ロ ゴ Of Compil1ation 
ロロ 己 ビ ビ ロ レ 呈 悟ら こも ed 
に いら レビ ら & 1Z 馬 s 2 さく ム 6 Och 
aa も & ぬ & レ 8 51Z@s フ 4 OO18h 
COmmOn &a レ は SS1ze3 O OOQOOQOh 
品 yhDO1 上 aD1G 5DaC@G re@mainin ロ si 1642 ミ 
、 A> コン パイル 成功 エラー な し . 
OO ボ 人 ここ ここ ここ ここ イズ 


Figure-5.3.3 CB-80 に よる コン パイ ラ の 実行 . 

次 は コン パイ ル に より 生成 され た リロ ケー タブ ル ・ オ ブ ジ ェクト ・ フ ァイル “SAMPLE . REL "と. 
ラン タイ ム ・ ラ イブ ラリ \CB-80 . IRL” と の リン ク を 行い ます 必要 な ら ば , 他 の 言語 や ,。 アセ ンプ 
ラ か ら の リロ ケー タブ プ ブル ・ オ プ ジ ェ クト と の リン ク も 自由 に 行う こと が で きま す . 


ooo の 252ccoooocnoS う ooo2ECr な 0022oNSA2202C222 の Coo2RCO2C を 2202oco の 22 の onoooo 寺 CGC の 022C の Sc 人 20032 


A>DIR SAMPLE。* / コン バイ ル に より 生成 され た ファ イル の 確認 . い 
Ak SAMPLE BAS 』 SAMPLE REL | 


ンー ズン アイ ル リロ ケー タツ レオ フラ エク ト ファ イル 、 | 


A>LKBO_ SAMPLE ! リン グロ ー ダ の 実行 SAMPLE. REL“ と *CB80.IRL" を リン ク す る . | 


人 定 4 


全 種 高級 


則 | 


語 に よる 同一 主題 ソフ ト 開 発 例 


LKBO_ VERSION 1.3 SERIAL NOD. 0O7245678B CUPYRIGHT ( じ ) 
1982 DIGITAL RESEARCH。 INC。 aaLL RIGHTS RESERVED 


ーー デー デーーーー マ ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー デ ーーーーーーーーーーーーー 


CUDE SIZEs 


CUMMON SIZE』i 


DATA BIZEs 


168O (OQ10Q-177F ) 
OOQOO 
O1AC (178BO-192B) 


SYMBOUL TABLE SPACE REMAININGs 75D9 


A>DIR SAHPLE。* / 生成 され だ ファ イル の 確認 . 


As SAMPLE BAS 』 SQMPLE REL 』 SQMPLE SYM 』 SAMPLE COM 
シン ボル ・ 品 ケーション ・ フ ァイル 実行 可能 な 純 マ シン ・ コ ー ド ・ フ ァイル , 
A>BaSTAT_ SAMPLE.COM ) SAMPLE. COM "の 容量 を 調べ る . 


RECS BYTES EXT ACC 
45 6K 
BYTES REMAINING ON zi 152 ド 


> 


Figure-5.3.4 


1 R/M AiSAMPLE。 CO 6K バ イト 長 で ある . 


RE CT 9 ン 


"SAMPLE”" ファ イル の 確認 と 。 ラ ンタ イム ・ ラ イプ ラリ と の り リンク. 


以上 の 手順 で , 実行 可能 な オプ ジェ クト ・ フ ァイル “SAMPLE . COM” が で き 上 り ま し た . 


は この プロ グラ と を 究 行 し て み ま し ょ う . 


1 +2+ マ く + 。。。。 n ヒコ X 
input n (n = 1。。。25O) --> 50O/ -…-251 以 上 で 入力 エラ ー. 
0Du も り (n = 1。、。。280) ペナ の 07 今回 は 正しい 入力 値 . 


1 + フ + さ +。。。。 250Q = 。 さ 1 さ 275 --- 入力 仙 と 答え が 表示 され て いる . 


人 


Figure-5.3.5 BASIC コン パイ ラ CB-80 で 作成 され た SAMPLE" プロ グラ ム の 実行 . 


針 


「 スタ 


券 才 まで に 、 リン クー ローダ の 実行 二 成 さ まれ た シン ポル ・ ロ ケー ショ ン ・ フ ァイル を も タイ プア テウ 
ト し て 示し ます . この SYM” ファ イル は , デバ ッ ガ の SID や ZSID (3. 1 章 参 照 ) の シン ボル 入 


カ 用 ファ イル と し て 使用 で きま すず す , 


ン 3 ロ 


BASIC 


A2TYFPE ら SAHFPLE.SYN/ --- シン ボル ・ ロ ケー ショ ン ・ フ ァイル の タイ プア ウト 、. 


16EB INP.MS 1914 INPVAL 1744 CALC. ら 8 191 ビ ANSX 
1924 P 


仙 > 


Figure-5.3.6 リン ク ・ ロ ー ダ の 実行 に より 生成 され た シン ボル ・ ロ ケー ショ ン ・ フ ァイル を タイ プア 
ウト . 


参考 まで に , PC-8801 上 の N-BASIC と PC-8801 上 の CP ン M で て の CB-80 と を , 簡単 な アロ グラ ム 
を 使っ て 処理 速度 の 比較 を 行っ て み ま し た . 

ブロ グラ ム は , 変数 P を 1 か ら 100 ま で 変化 させ , その 2 乗 を 求め て 変数 X と し , それ を 何 回 か 繰り 
返し ,・P と X を 刻々 と スク リー ン に 表示 させ る , と いう 簡単 な ちの で す . 

全く 同一 内 容 の この プロ グラ ム を N-BASIC と CB-80 と で , 実行 し た も の を 次 に 示し ます . 


ょ oed "bench"/ N-BASIC で の `bench* プ ログ ラム を ロー ド . 
ロ k 

11 各 上) プロ グラ ム を リス ト ア ウト . 
4O DEFINT P。L。Y。X 

20 PRINT TIME* ま :PRINT 

さ Q FOR P=1 TO 1QO CB-60 と 全く 同一 の プロ グラ ム . 

4O FUR し =1 TO 100』Y=P/2』 X=(Y+Y) FsNEXT L | だ だ レイ ンタ ー プ リタ で の 実行 スピ ー ド 向上 の 
SO_ PRINT P』Xj』CHR$(&HD) 3 に マル チ ・ ス テー トメ ント な どの 配慮 が し 
6O_ NEXT P 復帰 の み 行う . 

7Q PRINT』iPRINT TIME$ 
BQO END 


] 


まだ た 実行 . (PC-6801 の N-BASIC に よる ) 
O0.00.22 プロ グラ ム の スタ ー ト 時 刻 . | 


10O 10OOO 次 々 変化 する P と X の 値 .| 外 要 時 間 2 分 05 秒 
OOi 02』 27 プロ プラム の 終了 時 刻 . | 
Ok 


Figure-5.3.7 PC-8801 の N-BASIC で の 実行 . 


Qa>TYFE BENCH.BAS/ CB-80 で の *BENCH* プ ログ ラム の ソー ス ・ フ ァイル を タイ プア ウト . 


MNTEBER P。 し 。、Y。X 


PRINT CHR を (1BH) 』 "AA" NEC の CP/M で の 時 刻 表 示 の エス ケー プ ・ シ ー ケ ンス . 
PRINT 


F=O 』 上 し =O 』 X=Q 


3 紀 


区 種 高級 言語 に よる 同一 主題 ソフ ト 開 発 倒 


FOUR F ビ =1 T ロ 10O 
| FOR し =1 TO 1Qo 
Y=F'/ つ で 
X= ニ (Y+Y)* ビ \SQME AS (」 
NEXT に 
PR4NT ビュ メル し HURSKODH) 』 
NEXT に 復帰 の み 行う 
PRINT ' 
PR INT 、 
PRINT CHR を も (1BH) 』 "AA" : 骨 出 。 
STOF 


Ne キジ 


Figure-5.3.8 CB-80 の ソー ス ・ フ ァイル . 


A>BENCHJ) CB-80 で コン パイ ル し た `*BENCH* プ ログ ラム の 実行 . N 


OOs 11:32 。 ” プロ グラ ム の スタ ー ト 時 交 | 
10O 1000O 炊く と 変化 する P と X の 値 .  ! 所 要 時 間 6 秘 
| CN-BASIC の 約 21 倍 ) 
OO0s 11: 3 日 ー プ ログ ラム の 終了 時 鹿 . | 


OOs 11s3 さ 日 CPM の リブ プ ブー ト に よる 時 刻 表 示 . 


> Mt りり 下 ン 


Figure-5.3.9 PC-8801+NEC CPM で の CB-80 の 実行 . 


CB-80 の , その 他 の 多く の 機能 の 紹介 は 省略 し ます . 


5.4 PASCAL 


5.4.1 PASCAL に つい て 


PASCAL は ,。 1968 一 1970 年 に チュ ー リ ッ ヒ の Niklaus Wirth に よっ て スイ ス で 作ら れ ま し た . 
PASCAL と いう 名 は , フラ ンス の 数 学者 , Blaise Pascal (1623ー1662) の 名 を と っ た も の で , 他 の 
多く の 言語 の よう に , 語 の 頭 文 字 を 綴っ た も の で は あり ませ ん . 

最初 の PASCAL コン パイ ラ は , 1970 年 に Control Data 社 の 大 型 マ シン 6600 シ レス テム に お いて 実 
用 化 さ きれ て いま す . 

PASCAL は , 本 章 の 5.10 に 取り 上 げた ALGOL 60 が その 母体 で ある と 言わ れ , 文法 な ど よ く 似 
て いま す (互い の ソー ス ・ プ ログ ラム を 比較 参照 し て みて 下さ い ). PL ノ 1I や COBOL の よう な 燃 雑 


40 


PASCAL 


さ が な く 。 BASIC や FORTRAN の 欠点 で ある スト ラク チャ ー ド ・ プ ログ ラミ ング と いう 点 で の 不 
足 を 補っ た , 最も 学習 し や すく 使い や すい 言語 の 1 つ で す . 


5.4.2 Digital Research 社 Pascal プ MT 十 に つい て 


(Pascal プ MT 二 は , MT Microsystem 社 の 製品 で ある が , 同社 は 1981 年 秋 に , Digital Research 社 き 谷 併 し た ) 

Pascal/MT 二 は , コン パイ ラ や エディ タ な どの 言語 シス テム , それ に ビジ ネス ・ パ ッ ケ ー ジ な どの 
デー タ 処 理 用 の アプ リケーション を 書い た り , 一 方 , 計測 シス テム や 通信 関係 の リア ル ・ タ イム 処理 
用 アプ リケーション を 書い た り , それ ら 双 方 の 目的 に 使用 で きる コン パイ ラ で す . 

Pascal プ MT 十 は , ISO 標準 (DPS/7185) の スー パー セッ ト (ISO 標準 を 満足 し て , さら に 拡張 
機能 が ある ) で あり , ROM 化 も 可能 な 純 マ シン ・ コ ー ド を 出力 し ます . よっ て , ユー ザー に と っ て 
は あま り 意 味 の な い P コ ー ド を 出力 する PASCAL コ 2 役 だ さ 3 実行 速度 が 5 一 10 倍 高速 に な り 
まま 
、 1JSO 標準 の 拡張 と し て は , モジ ュ ラ ー・ コ ン パ イル , 255 壇 字 ま で の 文字 列 操 作 アセ ンプ ブリ 言語 と 
の リン ク , アド レス お よび サイ ズ の 関数 , 割り 込み 処理 な ど が あり ます . 

また , 1 プ O ポー ト の コン トロ ー ル が 可能 で あり , か つ CPM の BDOS を 利用 し な い マ シン ・ コ 
ー ド を 生成 する こと が で まき, ROM 化 が 可能 な の で , 制御 用 プロ グラ ム と し て 機器 に 組み 込む こと が 
で きき ます 。 

まだ た 。 開 華 ツ ー ル と し て , コン ノッ \ イ ランカ ガ 。 シン ま ポ り ッ ク ュ メデ バッ ン ガ に 館 プ や ジッ ネジ 生ま れ 
て お り , 開発 環境 が 非常 に 良い PASCAL シス テム で ある と 言え ます . 


5.4.3 Pascal ン MT+ に よる 「SAMPLE」 プ ログ ラム の 作成 


まず , その ソー ス ・ ブ ログ ラム を 湊 に 示 も ます . 


ン イ 1 


全 種 高級 言語 に よる 同一 主題 ソフ ト 開 発 例 


numb s= ni tmD := ns (※ COmDutG Summa モ 上 1On \) 
wh11 numb > 1 do 
beqgin 
numD sg= numb 一 1』 
t 号 mD := デ tmD + numb 
nds 
NC た を 本 上 0 も ます 2 まさ セル 。。。。 。 HH。 地 ※。 も ep ) ( ポ ロビ ュ ロ 上 上 Su] *) 
nd。 ~. を 訪ね な いよ うに . 


こ ご の プロ グラ ム は 小文字 で 書い て ある が , 大 文字 で 書い て も 構わ な い ( し か し 小文字 の 亡 が 美しい ). 


Figure-5.4.1 Pascal プ MT 十 で 書い た 「SAMPLE」 プ ログ ラム の ソー ス ・ フ ァイル . 


ジー ス ・ フ ァイル 者 の エク スチ ンション 休 何 で も 柄 い ませ ん が SRC が アフ ォ ー ル ト 名 と な っ て 
いる の で ,。 SRC" と し て お け ば , コン パイ ル や リン ク な どの 実行 時 の コマ ンド ・ ラ イン で 省略 が で き 
て 便利 で す . 

次 に , Pascal プ MT 十 の パッ ケー ジ の 中 か ら , SAMPLE" プロ グラ ム を コン パイ ルー リンク … 実 
行 す る の に 必要 な 最低 限 の 各 フ ァイル を , STAT コマ ンド で 示し て お きま す . 


/ Qn>BaGTQT #。 ま / 2 い 


ReC5S Byt ト 5 Ext AACC ー 
278 35k る R/M AsMTPLUS. EDN コン パイ ラ の ルー ト ・ プ ログ ラム . 
1oO 1 さ k 1 R/M AiMTPLUS.OQO 
4 11k 1 R/M AiMTFLUS.QO1 
55 7k 1 R/M AIHTPLUB、002 | し 
59 Gt 。 1 RZM APREMSn96S、 | ピス 
1 さ 6 17k 2 R/M AiMTPLUS.OO4 
61 Bk 1 R/M AsMTPLUS.QOS 
46 6k 1 R/M AiHTPLUB。 OO6 デバ パッ ガ 用 の ルー チン の 1 つ . ここ で は 特に 和 め 要 で は な い . 
9O 12k 4 R/W AALINCMT CHN リン フー ロー マタ. 
190 24k 2 R/M AsPASBLIB。ERL ラン タイ ム ・ ラ イブ ラリ . 
7 1k 1 R/M AsSAMPLE。 SRC SAMPLE』 の ソー ス ・ フ ァイル . 
1 45 19k っ R/\ AiDISBOBO。COM 一 逆 ア セ ン ブ ラ . ここ で は 特に 秘 要 で は な い . 


Bytes Remaininqg Un ai 8BQOk 


仙 > 


Figure-5.4.2 Pascal プ MT 十 の コン パイ ル , リン ク に 必要 な 最低 限 の 各 フ ァイル . 


Nr で ァイル “SAMPLE. SRC′ の コン パイ ル か ら 始 め ま す . コン パイ ラ の 実行 と , 生 
成 さ れ た ファ イル の 確認 の 実行 例 を 次 に 示し ます . 


スジ 


F ビ ASCAL 


>DIR SRMPLE.*/) "SAMPLE? フ ァイル の 確認 . 


人 ak SAMPLE お に -- 最初 は ソー ス ・ フ ァイル の み 存 在 . 


A>HTPLUS_ SAMPLE $XPA ) コン パイ ラ の 実行 . スイッチ ヾ $SXPA* は 。 逆 ア セン プラ の だ め の 


オプ ジェ クト ・ コ ー ド と , リス ト ・ フ ァイル を 生成 する こと を 指示 し て いる . 
Pasca1 /MT+ Release 5.5 


(c) 1981 MT MicroSYSTEMNSG。 Inc。 


D} 5a5s@mD1er recCoOrds enabl1 ed 
PRN fi1e routed to diski 人 n 
CP/N-BO version 

キ 

Our て 1] 1 ロ 己 5: ゲー] 

Symbo1 Table Initialization 
vailable Memorys 6109 

User Table Spaces 211 さ ミ 

VS5.5 Phase 1 


Remaining Memoryi 2085 
VS5.5 Phase 2 
SAMPLE 


LineS s 25 
ErrOr55i O 
Code  』 2 くさ 


Data s ら 6 
Pasca1/MT+ 5.5 Compilation Complete 


コン バイ ル 成 功 . エラ ー な し . 
Q>DIR BAMPLE.* / 生成 され だ ファ イル の 確認 . 


Ak SBQMPLE SRC 』 SAMPLE PRN : SQMPLE ERL 
ンー ペン アイ ゴル リス ト ・ フ ァイル リロ ケー ダマ ブル ・ オ プ ジ ェ クト ・ フ ァイル 


> 


Figure-5.4.3 Pascal MT 十 の コン パラ の 実行 と 生成 され た ファ イル の 確認 . 


コン パイ ル は 成功 し て ,、 "SAMPLE . ERL′ (ERL=Extended ReLocatable object code) が 生成 
され て いま す .。 ERL ファ イル は , マイ クロ ソフ ト 粧 の REL" フ ァイル の 上 位 コ ラン パチ プル の リロ 
ケー タブ ル ・ オ プ ジ ェ クト ・ フ ァイル で 。 Pascal/3F 十 で 使用 する 聞 ア セン プラ や ディ マッ が の た め の 
の 情報 まで 含ん で いま す . 

次 の 作業 は , "SAMPLE.ERL′ と `PASLIB. ERL′ を リン ク し て , 実行 可能 な オプ ジェ クト ・ フ 
ァイル を 生成 する た め に , リン ク ・ ロ ー ダ を 実行 し ます . その 実行 例 を 次 に 示し ます . 


>LTINKMT SAMPLE * PASLIB/S/M) リン ツ ・ ロ ー ダ の 実行 ,. スイ ツチ ソン S* は , 私 要 な ライ ブラ リ の み を 選択 する 
指 が ボン W は SID や ZSID の だ め の "SYM“ フ ァ イ ル を 生成 する 指示 . 
Link/MT+ Release 5.5 


PrOC@5S1n ロ 11eー SAMPLE  .ERL 


ンス 3 


全 種 高級 言語 に よる 同一 主題 ソフ トド 開発 倒 


PrOC@ ほ S1n ロ ロロ ff} 一 PASLIB  .ERL 
| Undefined ら Symbol15s 


No _ Undefined Symbols 
OO51 (decima1 ) records written to .CUDN f ュ 11 


Tota1 Datag Q3 じ CH by ソト 上 e5 
Tota1 Codei 19 さ く QH bytes 
Remainin ロ # SDBBH by トモ es 


Link/MT+ Re1ea5 ら コ 。5 DrOCG85S1n ロ と OmD1eted 
リン グ 成 功 . 
A>DIR SAMPLE。*!) - 生成 され ね だ ファ イル の 人 認 . 


Ai SAMPLE SRC 』 SAMPLE PRN : SAMPLE ERL : SQAMPLE SYM 
Ar SAMPLE COM SID .ZSID 用 の シン ポル ・ テ ー ブ ル ・ フ ァイル . 
実行 可能 な 純 マ シン ・ コ ー ド ファ アァ イル. 


QA>B:STQAT SAMPLE .CONM / *SAMPLE. COM "の ファ イル 容量 を 調べ る . 


ReCs Bytes Ext @QCC 
ら 1 フ k 1 民 /M AzSAMPLE . CHM ドバイ ト 長 で ある . 
Bytes Remaining Un sz 67k 


A> 
_ ミー ここ ーーO OO エバ ウー こ ーー バ ベ ユウ ペ ヘー リーン 
Figure-5.4.4 リン ク ・ ロ ー ダ の 実行 . 実行 可能 な オプ ジェ クト ・ フ ァイル を 生成 する . 


リン ク も 成功 し て , 純 マシ ン ・ コ ー ド の “COM” ファ イル が 生成 され まし た . 同時 に , スイ ッ チ ソン 
に 北 り 、 5E) 25B (シン ポリ り リッ クタ ク ・ オ ンス トラ タ シ ョ ン ・ デ バッ ガ 、 3.13 机 表 本 ) に 入力 ずる シ 
ン ボ ル ・ テ チープ ブル ・ フ ァイル も 生成 され て いま す . 


A>TYFE SAMFLE.SYM ) -- シンボル: テー ブル ・ フ ァイル を ダイ プア ウト する . 

199E MOVERI 1981 MOVELE 19CO FILLCH 1 つく の 9 IOURESU 
1981 MOVE 1247 RESULT 1 OC2B GET oODS4 PUT 
1A3 ロ SYSMEN O2BF INPUT OS82 OUTPUT O21F N 

O21D NUMB O21B TEMP 


・ 


Figure-5.4.5 生成 され だ, SID, ZSID 用 の “SYM” ファ イル の タイ プア ウト . 


で 人 は. 天 あ ドド っ た サン マル レ ・ ブ ログ テム を 実行 し て み ま し ょ う 、 


ウイ スジ ン 1 


ピ PAS ご CAL 


QA>SAMPLE ) ^SAMPLE* プ ログ ラム の 実行 . 


#+2 つ 2+ ャ くす 。。。。 中 ヒコ X 


3DDU も nn (mn wm 1。。、250) ーー>4O0Q07 251 以 上 の 入力 値 エ ラー. 
#hBU も n (n = 1、。.250) ー7190) 今回 は 正しい 信 . 


1 +2+ さ +。。。。15O = 11 く 25 -- 入力 値 と 答え が 出力 され て いる . 


A> 
Figure-5.4.6 Pascal MT 十 で 作成 され た “SAMPLE” プロ グラ ム の 実行 . 
参考 まで に , Pascal プ MT 二 の 多 く の 機能 の 内 の 1 つ で ある 逆 ア セン ブ プラ” を 実行 し て み ま し ょ 


と の ユー チチ ォ サチ ィ プロ グラ テム は ユン ペイ ル に より 生 記 され ん 2 し と: 了 ギ 必 科 ファ イル 
か ら ,。 アセ ンプ ブリ 言語 の ソー ス ・ プ ログ ラム を 作成 し ます . 


ーー 入力 ファ イル . 
出力 ファ イル . 


| AaA>DISBQOBO_SAMPLE DISQSM.LST / 
Pasca1/MT+ 一 一 Disas5semb1erーー 5. らら 
CP/M- ヨ O version 

ロ b ject code filei SAMPLE.ERL 


Listinq fi11 3 SANMFLE . FRN 
utput fi s DISQASMN.LST 


End of proOqgram 


A> ご の 時 点 で , “DISASM. LST" ガ 作成 され て いる 


コー エーーー ーー uecuidluanauac_ le le ジ シ 


Figure・5.4.7 pascal プ MT 十 の ユー ティ リティ ・ ブ ログ ラム の 1 つ 逆 ア セン プラ ” の 実行 , 


作成 され た アセ ンプ ブリ 言語 の ソー ス ・ プ ログ ラム "DISASM . LST” の 一 部 を 次 に タイ プア ウト し 
て 示し ま すず 。 


6 A:TYFE DISASN.LST ナ 
| 
| 
| 
| 


PasCa1/MT+ Release 弓 . ら Copyr1ght (Cc) 19 昌 1 by MT MicroBYSTEMG Fage 則 1 
D1 る a 名 名 理 mD1y Of』 SAMPLE 


Gtmt Nest Source Statement / Symbo1ic Ob ject Code 
TEMP EQU OOQOQO + 
NUMB EQ ロ U QQQO2 
N EQU OOO4 
1 Q (* 。 PascCa1/MT+ sample program for "ADD1iCation CF/M" 。 ま *) 
っ O 


4 ら 5 ら 


台 栖 高 級 言語 に よる 同一 主題 ソフ ト 開 発 倒 


さ O 
3 9 PrOqram 5amD1es ( ま DFOLaAh ロ nam 己 *) 
QQOOO DE QO。O00。O0O0。O0O。 0O。OO。 OO。 90 
OOQB DE QO。00。00。OO。QO, 0QO。OQ。 QO 
OO10 JMF OQQQ 
電 Q 
に ) Q var  n。 numD。 tmDk 1nteqers (% var ュ aD1e ddG こ 1 aatioOn *) 
フ 1 
日 1 beq1n 
OO1 ミ LHLD OOO6 | 
QO16 SPHL 
OO1 ア 7 CALL OOOO 
O112 CALL OOFC・ [ 
1 1 @nd。 
0O115 CALL OOA7 ア * 
O1 1 日 CALL OQOQ 
Externa} reference chain る MIN Sox を お 
Externa1l reference chain 2@RIN ーー> OOQ7F 
Externa1 reference Chain る CRL ーー> 0O116 
Externa1 reference chain る GTI ーー> OOEBE 
Externa} reference Chain る LEI ーー〉> OO95 
External reference chain る SFB ーー> QODE 
Externa1 reference chain る 2DMD ーー デ う 0110 
Externa1 reference chain る INI ーー> OO18 
Externa} referenCe Chain る ゐ MRS ーー> O1O ウ 
External reference chain る HLT wm みり ます サ び 
Externa1 remference chain DUTFUT  --> OODA 
Externa1 reference Chain INPUT ーー> OOQO フ 78 
> 
Figure-5.4.8 * 導 アセ ンプ ブラ "で 作成 され た , ア セン ブリ ・ ソ ー ス ・ プ ログ ラム の タイ プア ウト の 一 部 . 


Pascal MT 二 の ,。 その 他 の 多く の 機能 の 紹介 は 省略 し ます . 


し 本 基 の 


きた に に つい そ 


PL (Programming Language One) は , 1965 年 に IBM か ら , まず その 仕様 書 System 360 
Operating System PL Language Specification が 一 般 に 公表 きれ まし た . 

1966 年 に は , その 仕様 に 基づき , 最初 の コン パイ ラ が イギリス の IBM Hursleay 研究 所 で 作ら れ , 
以後 , 何 度 か 機能 の 拡張 が 行わ れ 今 日 に 至っ て いま す . 

PL ノ I は , それ が 計画 され た 当初 の 目的 通り ,COBOL の 持つ 事務 処理 能力 と FORTRAN や ALGOL 
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に ジン] 


の 持つ 数 学 的 な 処理 能力 を 合わ せ 持 ち , か つ ,。 ア セン ブラ ・ レ ベル の 処理 を も 可能 に し た 。 非常 に 広 
い 分 野 に 適合 で きる プロ グラ ミン グ 言 語 で す . PL ノ 1] は , 構造 化 ア ログ ラミ ング 言語 で あり . その プ 
ログ ラム は , 読み 易く て 書き 易い と いう 特徴 が あり , 今日 の プロ グラ ミン グ 言 語 の 中 で も 重要 な 位置 
を 占め て いま す . 


9.9.2 Digital Research 社 P レ | -8O に つい て 


PL ルン 上 -80 は CPM の 開発 者 で デジ タル リサ ー チ ナ 社 の 社長 で ある Dr. Gary Kildall 自ら が , 情熱 を 
持っ て 作り あげ た コン パイ ラ で す . 

PL ン 1 は 非常 に 大 き な シ ステ ム で あり , ミニ コン ピュ ー タ に と っ て も 大 き 過 ぎ 。 その フル セッ ト は 
突 現 が 困難 で す . よっ て , ANSI は , PL ノエ ] サブ セッ ト G を 設定 し て お り , DEC, Data General Wang 
な どの ミニ コン ピュ ー タ で は , この 仕様 に 準拠 し た PL プ I を 提供 し て いま す . 当 PL ノ {I-80 も 同じ 
く サ プ セ ッ ト G に 準拠 し て で おり, これ は 他 の サブ プ セ ッ ト G お よび フル セッ ト の PL ノン I に 対し て , アッ 
ーッ た プ デル で す 

PL ンプ I-80 の 特徴 を 列記 する と, 


@ 事務 計算 の た め の 15 桁 10 進 計算 . 高速 な 科学 技術 計算 の た め の 固 定 お よび 浮動 2 進 デ ー タ 形式 
それ に 配列 と ポイ ンタ 変数 . 

@ 文字 列 と ビッ ト 列 操作 . 

@ シー ケン シャ ル お よび ラン ダム ・ フ ァイル を サポ ー ト . 

@LINK に よる オー バレ イ . 


な ど が サポ ボー ト さ れ て お り , コン パイ ル に より , マイ クロ ソフ ト ・ フ ォ ー マ ッ ト の リロ ケー タプ ブル ・ 
オプ ジェ クト ・ モ ジュ ー ル を 生成 し ます . よっ て , 他 の 言語 で 作ら れ た ライ ブラ リ ・ モ ジュ ー ル と の 
結合 が 可能 で す . 

4.2 草 で 取り 上 げた 8080 一 8086 ト ラン スレ ー タ ^XLT86” は , この PL ンプ エ -80 に よっ て 書か れ て いま す . 
5.5.3 PL ンプ I-80 に よる 「SAMPLE」 プ ログ ラム の 作成 


まず, PL プン 上 80 に よる "SAMPLE" ブロ グラ ム の ソー ニス “ プア 人 ルル を 示し まず. フィ イル 名 の ェ エ 
グ クス プチ テ チ シン ショ ッ 人 は 。 衝 す ME で を けれ ね ば を 9 り ま せん 


A>TYPE BANPLE.PLI ソー ス ・ フ ァイル 名 の エフ ステ ン ショ ン は *PLI" で な けれ ば な ら な い 。 


ーー PL エーBo 呈 &mD1 己 DCOdFam 了 す 〇 OF en て だ /“* */ 
5 っ 、 、 / さ ミー コー ャ クノ の 間 が コメ ント と な る . 「 
-- こ の プロ グラ ム を *sample* と する . 


ウイ 2 / 


各種 高級 言語 に よる 同一 主題 ソフ ト 開 発 姜 


PFOC Optionss(main)』 プロ グラ ム の 開始 . | 


dcC1 | 
ha fe wetaa1.(⑭) : 4 の O1 王 小生 
temD fixed deGcCimal1(6) ーー-6 桁 の 10 進 固定 小 迷 点 、 


/% 上] 己 〇 上 %/ 
Put kip 1155 上 ("1 て 2+ さ す 。。。。n = 5 ーー 復帰 改行 と タイ トル の 出力 . 
Put skipP3 一 復帰 ・ 改 行 . 


/* 1 ロロ 人 mm@ ら 呈 ロロ 司 〇 い モ 上 and に Key 1 ロロ ut ※/ 

key1nDps 
Put 1igt("input n (n = 1。。。250) ーー->")』 人 カメ ッ セ ピー ジ 出 力 . 
et 1isgt (n) 』 ーー 数 填 の 入力 . 


# す (ロロ く は 1 は ) ! 【n>20) 
then qO to keyinpj 
1 5 ちら 


* 入力 仁 の 判定 . 


/# と 〇 mmDu キ 曲 ※/ 
temp = Os [ 

do numb = 1 to ns  :「 ま で の 総和 の 計算 . 
temD = デ temp + numbs 

ら end 


/*。 ゐ ロ ちら いら し 〇 いて ※/ 
Dut mkip 1ist(" 1 オフ + ィ さす ト 。。。。 ロロ 。 "= 。 モ emD) 5 答え の 出力 . 


nd samD1@3 
N 谷 > 、 ックス 


Figure-5.5.1 PL ノ !I-80 に よる “SAMPLE” プロ グラ ム の ソー ス ・ フ ァイル . 


決 に 。PL ン I-80 の パッ ケー ジ の 中 か ら , “SAMPLE”? プログ ラム を 開発 する の に 最低 限 必要 な 各 フ 
ァイル を 示し て お きま す . 
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A>B: STAT *。*/ ヽ 
| Recs Bytes Ex 人 QCC 
| 6O k 1 R/M APLI。COM PL ブロ コン パイ ラ の ルー ト ・ プ ログ ラム . 

1 42 18k 2 R/M AiPLIO. ロ VL 

254 さ 2k 2 R/M AsPLI1。QVL | コン バイ ラ の オー バレ イ . 

247 さ 1k 2 R/M QiPLI2.0VL 

122 16k ) RW AnLINK、CODH ワン ラフ に に ダー 

さ 47 44k さ R/M AiPLILIB.IRL フン タイ ム ・ フ ィ ブ フリ ー 
| に 1 1 k 1 R/M ASANMPLE 。 PL 1 SAMPLE“ プ ログ ラム の ソー ス ・ フ アァ アイル. 


| Bytew Remaininqg On Ai 91k 


で ここ 「 ジア 


Figure-5.5.2 PL ノ I-80 に よる “SAMPLE′ プロ グラ ム の 開発 に , 最低 限 必要 な 各 フ ァイル . 


で は 。 コン パイ ル の 作業 か ら 始め ます . コン パイ ラ の 実行 と 生成 され た ファ イル の 確認 の 実行 例 を 
全 に 示し ます 。 


4 ご 


ンチ 2 


ーー ーーーーーーーーー ツ ーーー 
ーーーー ーー ツー ツーmmmm ツ mm ツ ……w……ーーーーーーーーーー- 


A>DIR SAMPLE.*/ -- 最初 の YSAMPLE" フ ァイル の 確認 . 
As SAMHPLE PLiI- ソ ー ス ・ フ ァイル の み 存 在 . 
A>PLI SAHFPLE まま DI/ コン バイ ラ の 実行 . アセ ンプ リ ・ ノ ソー ス ・ コ ー ド に 展開 し た *PRN” フ ァイル を 
ディ ス フ に セー プ す る だ め の ス イツ チ (C$DD) を 付け だ . 
NO ERRDR(S) IN PASS 1 


NO ERROR(S) IN FaASS 2 
コン バイ ル 成 功 . エ ラー な し . 


A>DIR _ SAMPLE。*) 生成 され だ ファ イル の 人 確 筆 . 


Az SAMPLE PLI 。 SQAMPLE PRN 』 SAMFLE REL 
ソー ス ・ フ ァイル 生成 され だ 生成 され だ 
\ > リス ト ・ ノ ァイル リロ ケー タブ ル ・ オ プ ジ ェ クト ・ フ ァイル シシ 


Figure-5.5.8 PL ン I-80 に よる コン パイ ラ の 実行 と 生成 され た ファ イル の 確認 . 


コン パイ ル は 成功 し て , “REL" リロ ケー タブ ル ・ オ プ ジ ェ クト ・ コ ー ド と , コン パイ ル 時 の コマ ンド ・ 
フイ ン に 付け た “$DI" スイ ッ チ に より , アセ ンプ ブリ 言語 に 展開 され た “PRN” ファ イル が 生成 され 
ま も な 。 

僚 は 、 リ ング ク ・ ロ ー グ で 。 SAMMPLE 。 REE" に 各種 テラ ンタ イイ あま > ライ プラ リ LEEEBs 所 1) 
を リン ク し て , 実行 可能 な 1 本 の ファ イル に する 作業 で す . ここ で 使用 する リン ク ・ ロ ー ダ は , PL 
1-80 の パッ ケー ジ に 含ま れ て いる , デジ タル リサ ー チ 社 の リン ク ・ ロ ー ダ で す . その 実行 例 を 次 に 示し 
ト 本 


| IAMK ょ 。 ユ | 


PLILIB RGQST ら SANPLE O1QOQO /SYSIN/ 1EE さ ZSYSPR1I/ 1FQ - シン ボル ・ デ テー ズル 


が 出力 さがる . 
ABSULUTE OQ0QOO 


CODE SIZE 1DBA (QO100-1EB9 ) 
DATA SIZE 0222 (1FSE-21 7F ) 
COMMON SIZE  QQOD4 (1EBA-1FSD ) 
USE FACTOR EO 


リン フ 成 功 | 
A>DIR SMPLE。*/ 生成 され だ ファ イル の 確 説 . 


し > BAMPLUE PRN 』 BANPLE REL 』 BANELE _CQNM 


as SQMPL NN 生成 され だ 実行 可能 な 
生成 され だ シン ボル ・ 純 マ シン ・ コ ー ド ・ フ ァイル . 
テー プル ・ フ ァイル 

人 A>BsSTAT SAMPLE.CDM) "SAIMPLE. COM" の ファ イル の 容 暑 を 調べ る . 
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台 種 高級 言語 に よる 同一 主 症 ソフ ト 開 発 倒 


ReCs Bytes Ext Acc 
65 9k 1 R/M AiSAMPLE.COM 9K パ イト 長 で ある . 
Bytes Remaining ロ n si 76k 


ま ソ 


ここ こっ の ニー ニニ ーー 


Figure-5.5.4 コン バイル に より 生 大 あま 札 た SAMPEE REU と ラン タイ ム *・ ラ イプ ラリ と の リン グ 。 


最終 目的 で ある 実行 可能 な 1 本 の 純 マ シン ・ コ ー ド の オプ ジェ クト ・ フ ァイル が で き 上 り ま し た . 
同時 に , SID や ZSID (3.1 章 参照 ) に 入力 可能 な シン ボル ・ テ ー ブ ル ・ フ ァイル も 作ら れ て いま す . 
で は 。 でき 上 っ た “SAMPLE′ プロ グラ ム を 実行 し て み ま し ょ う .。 


pe = ニーー… ppe mm ニーーー ae rm Pe ーーーー ニ ーー 一 ー ーーーーーーーーーーー… Pr ーーーーーーーー mm 


A> ら AMPLE 7) SAMPLE" プ ログ ラム の 実行 . | 
も キズ キキ うす 、。。。P ー XX | 
ょ nDu も n ロ (n ロ = 1。。。250) ーー> さ OO 》) 入力 信 の エラ ー. | 
ま RDUE 0n (mn = 1。。。250) ーー>2OO / 今回 は 正しい 値 を 入力 . | 
| 

# ャ ネプ ブ ャ うす 。。。 。 200 = 2010Q 入力 値 と 答え が 出力 され だ . 
End of Execution PL の シス テム に よる 出力 . 
仙 > 

ン 

3 ASS 22 NSR 0288 NSRSS238688 90252 


Figure-5.5.5 PL/I-80 で 作成 され た “SAMPLE” プロ グラ ム の 実行 . 


次 に 参考 まで に , コン パイ ル 時 に 生成 され た リス ト ・ フ ァイル “SAMPLE . PRN” の 一 部 を 示し て 
お 和 ま すず す PL し / ほ の ソー ス ・ プ ログ ラム が , アセ ンプ リ 言語 に 展開 され て いま す . 


A:TYPE SAMFLE 。PRN 』 ハ 


PL/ エ -BO V1.3 COMFILATIUN Fi SAMPLE 


Di Disk Print |! コン バイル 時 の D お よび | スイ ッ チ の 機能 の 
| 。 エ 』 Inter1ist Source and Code | 説明 文 ガ 出 力 さ れ て いる . 


NO ERROR(S) IN PASS 1 | 


NO ERRUR(S) IN PASS 2 


PL/ エ -BO V1. さ COMFPILATION OF SAMPLE 


1 OQOOO /#* 。 PL/ エ -BOQ samp1e ProOgram for "QpDD11iCation CF/M" 。 ※/ 


2 OQQOO 

さ a OOOO samp1 es | 
OOOO LXI  B。O2OO | 
OOO さ CALL 2START | 

4 a OOO6 PFrOC Option5=(main)s | 

S c QOQQ6 dc1 | 


ン ら 0 


PL グ M 


| 6 Cc OOQOQ6 (n。numb) 1 deCima1 (4) 。 
| 7 c OOQ6 tmD fix ロ と 1ma1 (6) ョ 』 
| BB c QOQO6 
| 9 Cc QOQOO6 /※ 上 ュ 上 1 己 〇 ut 上 */ 
1O c OQOQ6 Put skipD 1155 上 ("1 せつ 2+ ナ さす 。。。。n ロ = x*) ョ 』 
| QQQ6 LX1  D。0252 
| OOQ9 LXI  B。OOQQ 
| QQOOC CALL 2?2SYSPR 
| 6154 MVI AA。Qg 
| Q156 MVI  B。OQO 
Q15 晶 CALL ?20DCOF 
O15B CALL ?2PNVOP 
O1SE CALL 201IOOF | 
O11a = ニー デー O161 | 
ぱこ に D161 
さ O a 0161 end samples 
QO161 CALL ?2STOPX 


| 

| CODE SIZE = O164 
| DATA AREA = OO4C 
| FREE SYMS = O289 


END COMPILAT ION 


Figure-5.5.6 コン パイ ル 時 に 生成 され た リス ト ・ フ ァイル の 一 部 を タイ プア ウト . 


5.6 PL ン M 


5.6.1 PL し プ M に つい て 


PL プ M は , イン テル 社 が 1974 年 に 発表 し た , 8008 お よび 8080 用 の コン パイ ラ で あり , 特に マイ クロ 
コン ピュ ー タ の ソフ トウ ェ ア の 開発 に 遂 す る よう に 。 シン プル に 作ら れ た プロ グラ ミン グ 災 時 で す . 

CP〆M の 開発 者 で 。 デ ジタル リサ ー チ ナチ 社 の 社長 で ある Dr. Gary Kildall も , 当時 イン テル 社 の コ 
ン サ ル タ ン ト と し て , PL プン M の 開発 を 行い まし た 。. 

PL/M は , 最初 は FORTRAN で 書か れ , その 後 ア セン ブラ て 書き 直さ れ , さら に その 後 。 PL ン 
M 自身 に よっ て 書き 直さ れ て 現在 に 至っ て いま す . 

PL〆M は , PL プ I に 似 た 構造 化 プ ログ ラミ ング 言語 で あり , マイ クロ プロ セッ サ の きめ 細か な コ 
ント ロー ル が アセ ンプ ブラ に 近い レベ ル で 可能 な マイ クロ コン ピュ ー タ ・ シ ステ ム に 密着 し た 高級 言語 
で す . シス テム の 記述 が 可能 で .。 マイ クロ コン ピュ ー タ の 機能 を 十分 に 活用 で きる 高級 言語 は , この 
PL/M と FORT だ け と も 言わ れ て いま す . また , CPM の いく つか の 部 分 は 。 PLZM に よっ 
て 書か れ て いま す (Version 2.0 に な っ て , アセ ンプ ブラ で 書き 直さ れ た 部 分 も ある が ). 


つら 1 


各種 高級 言語 に よる 同一 主題 ソフ ト 開 発 例 


5.6.2 Systems Consultants 社 PLMX に つい て 


PLMX は , イン テル 社 の PL プ M と コン パチ ブル の プロ グラ ミン グ 言 語 で あり , PL プ M が イン テ 
ル 社 の ISIS- II オペ レー ティ ング ・ シ ステ ム 専 用 で ある の に 対し , PLMX は , CPZM 上 の PL/M 
と 言っ て も 良い で し ょ う . PLMX の マニ ュ ア ル は , 言語 マニ ュ ア ル が 付属 し て お ら ず , その ユー ザー 
ズ ・ ガ イド の 中 に は ,「PL/M に 関し て は , イン テル 社 の 『PL プ M-80 Programming Manual ( ド 
キュ メン ト No98-268B) を 参照 し て くれ 」 と 書か れ て いる の が お も し ろ い と ころ で す . 

PLMX コン パイ ラ は ,。 PL ププ M の ソー ス ・ フ ァイル を コン パイ ル し て , アセ ンプ ブリ 言語 の ソー ス ・ 
ファ イル を 出力 し ます . よっ て ,。 当 コ ン パ イラ は , PL プ M ソー ス ・ フ ァイル か ら ア セン プリ 言語 の ソ 
ー ス ・ フ ァイル へ の “トランスレータ? と 言っ て も よい で し ょ う . 出力 され た アセ ンプ リ 言 語 の ソー 
ス ・ フ ァイル の 形式 は 。 マイ クロ ソフ ト 社 の MACRO-80 (3. 3 章 参 照 ) に 準じ し て お り , も ちろ ん そ 
の まま で アセ ンプ ブル す る こと が で きま す が , 必要 と あら ば , その ソー ス ・ フ ァイル を エディ タ を 便 っ 
て , 自由 に 書き 替え て 使用 する こと も で きま す . 

PLMX は , CPM 上 で 実行 する プロ グラ ム を 開発 する 場合 に 便利 な よう に , CPM の シス テム ・ 
oo 3 だ が も た 。 ディ ルター チア を きわ す /O ユー ティ ォ リ ティ ・ ラ テイ テ フ リ る で 、 エア 基 ポ ー 
ナル (外部 )・ プ ロ シ ジ ャ と し て 用 意 し て いま す . 


5.6.3 PLMX に よる 「SAMPLE」 プ ログ ラム の 作成 


ま 定 で た だ 大 に 上 る ツー ス ・ プ ョ ゲラ ム を 示し ます 、 


ーー へ 、 


ES SAMPLE.SRC ファ イル 名 の エク ステ ンション は 何で も よい が , 伯 
、 YSRC” ガ デフ ォ ー ル ト 名 に 指定 され て いる . 
/* 。 PLMX (PL/M) samp1e program for "APP11iCation CP/MNW ま / ブ ン * ン * ノ の 間 が コメ ント と な る . 


amD1Gs 
dOs 
deCla レ re bufptr addre553 /* 5 ら モ 上 モ ュ in ロロ Duf 和 fer %/ 
らら ヒ 1aFrG = モ 上 a ヒ uu5  &ddrLGS55 
decClar COunt addre555 
ddG ヒ 1a み し @ "DuU 了 1ptr addre55j 
decClare@ temp addr@GS$ 
declare numb &HdreGS5S3 
declare mssq1(15) byte data ("1+2+ ォ さす 。。。。n テ X") ま | ーー 
dec1are mssg2(2 昌 ) byte data ("INPUT n (n = 1..-25O) ーー>* ) 』| 種 デ ー ツ の 定 二 


dec1are mssq さ (1O) byte da も ta ("1+2+ さ +。。 7 う 5 | 
declare msgsqd4 (さく) byte data (" = "25 
declare cr1f (2) byte data (Odh。Oah) 5 
| dec1are buf 和 ff1(1O) bytes 

declare buf 和 2(2O) addr@e55s 


/#* sy5tem と a11 DrOCGdUurG  ※/ 


ニコ 


F ビ LM 


| し 己 as 
| PLOCeGdur@G (functiOn。 Duf 和 fr 。 COunt 。 a ヒ も い a1 。 5 も a モ もい 5) 己 x キ ビ ロ a1 
| dd@ ヒ 1 ar (funCtiOn 。 buf 了 er 。 と 〇 Un ロモ 。 a ヒ ua] 。 品 モ ゥ もい ほ ) add ヒ GS5s 
| 千 床上 3 行 入力 , 行田 の ライ ブ 
ラリ を 使用 する 手続 き . 
wF1 て 選 s 
DLOCGdur@ (funcCtiOn 。 Duf 和 ff 己 [ 。 こ 〇 un ロ t 。 上 も ゥ モ uu) 与 X 上 ヒロ a1 3 
ほら ほ ヒ 1aF@ (funCt On 。 Du 和己 。 こい u ロ 人 。 呈 モ a み もい 5) ad し G5S5 
己 ロ d Wr1 た @ 
/# 。 PL/M 11DFLary Ca1 1 DFrOCGduUFG #/ 
nu1 ns ジイ ペー ジン レン デレ ーー ーー ンー ニー 
| PFOCGdur (buffer) address RGNFBeI IE 
| declar 。 buffer addre555 2 
| end numins 
| nm ロロ uts 
| PFOCGduFr@ (Valu ら @。 Da5 己 。 1 と 。 buffadr 。 width) externa1s 16bt パ イナ リーASQI 文 字 
| deGC1a&r@ (Valueー。 buffadr) addres5』 変換 の ライ ブラ リ を 使用 す 
deCiar@ (ba5 ら 。 1 と 。 width) byt キ es る 手続 き . 
hd nmOuts 
| /# 。 ma1in Out 上 1n@ %/ 
| に あま 』 WP は も の (0。 。CF1 を 。 2。 ・5ta 革 い 包 ) 3  / ま ロビ 1nt mm 所 品名 っ #/ 
Ca11 write (O。 。ms5 ロ 1。 15 ら 。 .status)』 
た まあ 1 よ 1 WP1 も @ (OO。 。 と FC1f。 2。 ・ 人 Sa 上 いち) s 
| Ca11 write (O。 .ms5 ロ 2。 2 日 。 .wtatus) 
| /# 。 read number ま / 
Ca11 read (0O。 。buU イ fff1。 1 の O。 。COunt 。 。 后 tatus)』 /#* 。 read  \/ 
| buf 1Dt 上 Fr = 。Duff18』 /※ 。 る 己 モ Duf 和 er DOinter *#/ 
| n ロ umD = num1n (。Duf1Dt ヒ )』 / ま ※ 。 CO ロ ソ も t 〇 binary  #/ 
do while numb > 250 ョ 』 
Ca11 write ( 〇 O。 。mss ロ 2。 2 日 。 .status) ョ 』 
| Ca&11 と @ad  ( ひ O。 。buff1。 10。 。COunt 。 。atatus)』 
| buf 1ptr = .buff1s 
| numb = numin (。Duf1ptr)』 の 
| ends - 
| に ぬき 1 1 wri@ ( ひ O。 。 と Fr1f。 2 つ 。  。wtatus)』 ル 
| と &11 writ 呈 (O。 。 ヒ FL1f。 2 つ 。  。。smt 上 atuew)i /# again / チ 
| Ca1l1 wLit (O。 。msss5 ロ さ 。 1O。 .statusw)』 /% ま 。 DFL1nt msa ロ @ #/ の 
| と ぬ 1 1 nmOut (numD。 10。 。" )。 。DBuf イ 2 つ 。 4)』 /#* 。 binary 人 aswCii */ 
| Ca11 writ 呈 (0。 。DuUf サ す つ 。 4。 .5t 上 atus) / ま 。。 wri 坪 numD@ レ 生 / | 
| Ca11 writ ら ( 〇 。 。mg55 ロ 人 4。 さ 。 。、55 モ at 上 us) ョ / ま DFIPDEL “ムジ まま / 
| 
| temp = numbs /* 。 caliculate */ 
| doO while numb >= 1』 
| numb = numb 一 1』 
| temp = temp + numbs / ま 。。 answer = 二 mD #/ 
@n ロ 5 
Ca11 nmOut (temp。10。" 「。。Duff2(4)。 7)』  /# 。 binary 上 O awCii \/ | 
Ca11 write (O。 。buff2(4) 。 7。。、wtatus)』 /% 。。 wr1t@@ On COn タ SO1eg キ / | 
Ca&11 write (O。 。Cr1f。 2。 。status)』i / ま %。 と Fr1f at finish #/ | 
| 
己 ロ ロコ 5amD1Gs 


SS 2 


Figure-5.6.1 


PL/ZM に よる "SAMPLE" プログ ラム の ソー ス ・ フ ァイル . 


ン ら 3 


種 高級 言語 に よる 同一 主題 ソフ ト 開 発 例 


ゾー ス ・ フ ァ ネ ル 者 の エタ ステ ンション は 何で も 構い ませ ん が , "SRC が デフ ォ ー ル ト と し 北 指 定 
され て いま す の で ,。 SRC” と し て お くく 方 が 何かと 便利 で す . 

次 に , PLMX の パッ ケー ジ の 中 か ら "SAMPLE" プロ グラ ム を 作成 する た め に 必要 な 最低 限 の 各 
ファ イル を 示し て お きま す . 


ンーーー ニ ーー ーー ニー ーー ニーーーーーーー Pe RECfere 


>BsGTRT %。 ま 」』 


ReCs Byte5 Ext 人 CC 
re プア k 1 R/M AzPLMX.COMN _ - コン パイ ラ の ルー ト ・ プ ログ プラム. 
155 2 つ 0 ト 2 R/0 AiCUDA. PLN 
15 ヨ 20k 2 R/0 szFNLCG . PLN | 
158 20k 2 R/0 AsFARSER . PLM | 
4 1 ム 6k 1 R/ ロ nzPLMLEX .FPLN し コン パイ ラ の オー バレ イ . 
1 さ っ k 1 R/0 Ak IAQTABLE .FDR [で SAMPLE" プ ログ ラム で は 使用 され な いも の も ある ) 
に jp 1 1 に 1 R/ ロ AzIETABLE .FUR 
1) 1 k 1 R/0 nzIHTABLE.FOR 
B4 11k 1 R/M AsLBO。COUMN リン ツク. ロー ダ 、 
すき P491 4 2 R/M AsHBO.。COM マクロ ・ ア セン プラ . 
らき さ の 4 1 R/M gzIOULIB.REL 
29 4k 1 R/M AsRLTB。REL | ビ 往 フイ ブフ ブリ: ファ ィ イル 
に さ k 1 R/M Az SAMPLE . SRC ーーSAMPLE" の ソー ス ・ フ ァイル . 


Bytes Remaining Dn sz 109k 


ム >. 


Figure-5.6.2 PLMX に よる SAMPLE" ブロ グラ ム 開 発 に 必要 な 最低 限 の ファ イル . 


で は , コン パイ ル の 作業 か ら 始 め ま す . コン パイ ラ の 実行 と 生成 され た ファ イル の 確認 の 実行 例 を 
失 に 浅 し まま - 


A>DIR SAMPLE。 ま %) --- 最初 の "SAMPLE" フ ァイル の 確認 . 
QA』 SNMFPLE 人 8 調 ドー ソー ス ・ フ ァイル の み 存 在 . 


A>PLMX SBAMPLE 』 M+C+/ コン バイ ラ の 実行 . スイ ッ チ ヽ M+* は , 当 モジ ュー ル を メイ ン 
モジ コー ル に 指定 する ヾ C+* は , コン パイ ル ・ リ スト を コン ソー ルビ 出力 きせる. 
PLMX CUMPILER VERSION 2.4 


COPYRIGHT (C) 198O。 SYSTEMS CONSULTANTS。 INC・- 
TITLE ANPL 
NAME (SAMHPL* ) 

SAMPL ii 、 ーー 。 
cr Yuirs 。 ツン ソール に 出さ れ た コン ルイ ルリ スト 


PUBLIC QnAAABS 。 AAAAAS 


AAAAA3: 
LX 1 日 。 ま + ら 6 
JMP INIT る 
AAAAB3』 


# 
3/#* 。 PLNX (PL/N) sampD1e DFOdFam OF "QADD11Ca キ tion じ P/M" 。 ま / 
1 


つら 4 


PL〆M 


TOO さ る う * 

DS Q2H 

END AAAAAS 
END OF COMPILATION 
OQQO _ ERROR (8) DETECTED 


コン バイル 成 め 、 エ ラー な し . 


A>DIR SAMPLE。 ま / 生成 され だ ファ イル の 確認 . 
Az SAMPLE SRC 』 GaAMPLE MAC 


ンー スム ・ フ アイル マイ クロ ソフ ト 社 の MACRO-80 形 式 の アセ ンプ ブリ 言語 ソー ス ・ フ ァイル . 
> オプ ジェ クト ・ フ ァイル で は な ぐ , ソー ス ・ フ ァイル で ある こと に 注目 . 


こ ー ビビ 
ーー as の eo 


2 2 oo EE ae 2 YS 


Figure-5.6.3 PLMX に よる コン パイ ラ の 実行 と 生成 され た ファ イル の 確認 . 


ソー ス ・ フ ァイル “SAMPLE . SRC” の コン パイ ル は 成功 し て , アセ ンプ ブリ 言語 (マイクロソフト 
社 の MACRO-80 形式 ) の ソー ス ・ フ ァイル が 生成 され まし た . この こと を 「 ア セン プリ 言語 の ソー 
ス ・ フ ァイル に 展開 され た 」 と も 表現 し ます . 

生成 され た アセ ンプ ブリ 言語 の ソー ス ・ フ ァイル “SAMPLE . MAC” で CMAC” は , MACRO-80 の 
ソー ス ・ ラ ファ イル に 付け る エク ステ シン ション) を 見 て み ま し ょ う . その 一 部 を 次 に 示し まま まず 


A>TYPE_SAMPLE. MAC ) 展開 され だ ソー ス ・ フ ァイル を マイ プア ウ ト . 0 


TITLE SANPL 

NAME ("SANMPL" ) 
GANMPL ss 

EXTRN INITS 
PUBLIC AAAAB9 。 AAnAA め 


AAAAASs 
LX 1 日 。 ま +6 
JMP INIT る 
AAAAB る 3』 


# 。 ( 
3/# 。 PLMX (PL/NM) sample program for "ApDpD11icCation CP/M" 。 きき / 


。 各種 定義 宣言 ・ 手 続き の 部 分 . 
se りこ こら 辺 の も の は コメ ント 扱い 
4 | に な つて いる . 
5 ほら C1 ar (value。 Duffadr) address5 | 
3 de@C1ar@ 与 (Da55 己 。 1 と 。 wi1dth) by トキ 65 | 
5 end nmOuts 
H 
5/% 。 main し ロロ ut}jnG ま / 2 
* 
日 Ca11 write@ ( 〇 。 . ヒ Fr 上 1 和 ff す 。 つ 。 。。55 上 a 上 い 色 )』  / ま DF1n ロ 上 meSSaq 己 \/ 
GOO23』 
GOQ20s メイ ン ル ー チ ン 部 
BOO1ni 
GOO1 3 
LX1 B。,OH 
PUSH B 


ン ら 5 ら 


首 種 高級 言語 に よる 同一 主 琴 ソフ ト 開 発 例 


LX1 B。AOOOF 
PUSH B 

LX1I B。O2H 
PUSH B 

LX1 D。AOQQ2 | 
PF B | | 
CALL MRITE | 


# Cal1 write (O。 .mssq1。 15。 ・status)s 
LXI B。OH 
PUSH B 
LXT B。AOOO フ 7 
FUSH B 
た 大 ま 』 お 。0FH 
PUSH B 
LXI D。AOOQO2 
POF B 
CALL MRITE 


H と まま MP ま も 電 《( ひ O。 で FC1 人 人 。 2。 ・ も a も キ u5) 
LXT B。OH 


TOO2As 
DS Q2H 
TOO2Bs 

DS Q1H 
TOO さ さ 』 


DS Q2H 
END AAAAA る / 


2 
Se 02382802838 衝 9 


Figure-5.6.4 コン パイ ル に より 生成 され た アセ ンプ リ 言 語 の ソー ス ・ フ ァイル の タイ プア ウト . 


この ソー ス ・ フ ァイル は , この まま で アセ ン ブ ル す る こと が で きる 状態 の も の で す が , 特に アセ ン 
ブリ 言語 の レベ ル で 手 を 入れ た いこ と が あれ ば , エディ タ を 使っ て この ソー ス ・ フ ァイル を 自由 に 書 
た あこ と が で まま す . 

次 は 。 こ の ソー ス ・ フ ァイル の アセ ンプ ブル で す . この まま の ソー ス ・ フ ァイル SAMPLE . MAC" 
を MACRO-80 を 使っ て アセ モン ブル し , それ に よっ て 生成 され る ファ イル を 確認 する 例 を 示し ます . 


ん 旨 QA>BO_ SAMPLE 。 SAMPLE=SAMPLE 7 MACRO-80 に よる アセ ンプ ブル の 実行 . 


NO Fata1 @ ビ OF( 品 ) 
アセ ンプ ル 終 ず . エラ ブー な し . 


QA>DIR SAMFLE.*/) 生成 され だ ファ イル の 確認 . 


QAs SANFLE SRC 』 SANHFLE MAC 』 SAMPLE PRN 』 SAFIPLE _REL 


PL_M の ソー ス ・ フ シイ ル 。 アセ ンプ 半月 の 。 生成 され だ を 毅 SGhE 
A> レース. ファ ィ ル リス ト ・ フ ァイル リロ ウー タフ ルオ フラ エフ ト ファ イル . / 
NR32000820808808200008008008000808888082 ボ 0 人 80200000000000200000000000800000000000 ボ 0000000 0 と 


Figure-5.6.5 コン パイ ル に より 生成 され た アセ ンプ ブリ ・ ソ ー ス ・ フ ァイル を , MACRO-80 に より リア 
セン ブル する . 


ン ら 6 


PL ノン M 


アセ ンプ ブル が 終了 し ,。 リロ ケー タブ プル ・ オ プ ジ ェ クト ・ フ ァイル ("REL” ファ イル ) と リス ト ・ フ 
ァイル ("PRN′ ファ イル ) が 生成 され て いま す . 
注 ) MACRO-80 と , LINK-80 に つい て は , 3. 3 章 で 取り 上 げ て いま す の で 参照 し て 下さ い . 


いよ いよ 湊 は 最終 ステップ の リン ク 作 業 で す . 

PL/M の ソー ス ・ プ ログ ラム の 前 半 部 に , 外部 ライ ブラ リ ・ ル ー チ ン を 使用 する た め の 手 続き 文 が 
あぁ あり ます が ,。 その ライ ブラ リ を 含む 2 つの オプ ジェ クト ・ フ ァイル “RLIB . REL” と “1OLIB . REL" 
を , メイ ン ル ー チ ン の “SAMPLE . REL” に リン ク し ます . 

その 実行 例 と 生成 され た ファ イル の 確認 を 次 に 示し ます . 


RSS 9 2 SSR へ 
これ つら を リン ン し て 。 an 、 つ ファ イル る る の COM* ファ イル を 作成 する . 


ーーーーーーーーー ーーーー リン クツ 作業 終了 と 同時 に CP/M に 戻る . 
OOM“ ファ イル を 作成 . 


メイ ン ・ モ ツジ ユール フイ ブフ リ 1 ライ ブラリ 2 f 
QA>LBO SANFLE 。 RLIB, 1DLTB/S, AMPLE/E/N ) 


LINK-BO 3 さ 。.44  O9-DEC- 昌 1 COPYRIGBHT (C) 1981 MICROSOFT 

XNULT 。 DEF 。 BLUBAL BP67 ふ この エフ ラー・ メ ッ セ ー ジ は , BP6/ @ が , RLIB と IOLIB の 双方 に 存在 する 
だ め の マ ル チ ・ デ イィ ファ イン ・ エ ラー. 無視 し て よい . 

DATA O1Q さ OB56 く 264 る > 


293O8 BYTES FREE ェ ー 11 ペ ー ジ (256 パ イト x11) の 幼 マ シン ・ コ ー ド が で きた. 
LO146 OB5e 111 

リン ンク 終 了 . 

A>DIR SAMPLE。\*) 生成 され た ファ イル の 確認 . 。 


Az SAMPLE SRC rk SANFLE MAC 』 SANPLE PRN 』 SAMPLE REL 
Qs SAMPLE CON 


実行 回 能 な 芳 マシ ツン ・ コ ー ド ・ フ ァイル 


A>B』 BTAT SAMPLE.CON ) SAMPLE. COM の ファ イル 容量 を 調べ る . 
RECS BYTES EXT ACC 
の の さ に 1 R/M AzSAMPLE.CODM 3K バ イト 長 で ある . 
BYTES REMAINING OUN Ag 72k (本 凍 の 言語 の 中 で は , ROy FORTH に 災い で コン パク ト て ある ) 


人 > 


Figure-5.6.6 アセ ンプ ブル に より 生成 され だ メ ギ ン * そ モダ デュール と ライ プラ リ ・ モ ジュ ー 贅 まほ の リン ク 、 


最終 目的 で ある 実行 可能 な 純 マ シン ・ コ ー ド の ファ イル が で き 上 り ま し た . サイ ズ は 3 K バ イト で , 
他 の 言語 に 比べ る と か な り コ ン バ パク ト で あり , 本 章 の 中 で は , Rgy FORTH に 次 いで 小さ いも の で す . 
で は 。 で き キ っ か SAM 用 プロ グラ ム を 実行 し て み ま す . 


プ ら ラフ 


台 種 高級 言語 に よる 同一 主題 ソフ ト 開 発 倒 


ンー ペー 


ラン 


/ AA>GAMPLE / 


INPUT n (n 


| ます の キキ うす を 。。、。。 


> 
人 


ーー 


SAMPLE" プ ログ ラム の 実行 . 


4 + つ フ + ミ る + 。。 。 。 ロ に X 
INFUT n パ (n- 


生 1 。。。 こら O ) 
に コ Ok 


10O mw 505o- 


ーー>26 ひ 0 / 
ーー2300 7 - 


251 以 上 の 入力 値 エ ラー. 
再 展 正 し い 値 を 入力 . 


入力 伺 と 答え が 出力 され て いる . 


Figure-5.6.7 


参考 まで に , MACRO-80 で の アセ ンプ ブル 時 に 生成 され た , 


PLMX (PL/M) で 作成 され た “SAMPLE” プロ グラ ム の 実行 例 . 


i ダ オプ チト し て 。 その 一 部 を 未 し て お きま す . 


4 AXIYPE SAMPLE .FRN 


アセ ン ブ ル に より 生成 され だ "PRN" フ ァイル の ダイ プア ウト . 


水 ス トマ アテ イル 


SAMPLE . PRN" 


5 
5/* 。 PLMX (PL/NM) mample program for "application CP/M"  */ 


ai 


・ と Cr1f。 ご 。 .5tatus)』  / ま DF1nt messade \/ 


・ Oh 呈 多 1 。 


SAMPL MACRO-O ミ .44 Q9ー-Dec - 日 1 PAGE 1 
^。 "は 相対 アド レス を 表す . os 
ッ バ - NAME (*SANPL" ) 
OOOQO* ら RNMPL ss 
EXTRN INIT る 
PUBLIC QAAABS3 , QAAAA る 
O0007 QAAAASs 
QQOOQOO* 21 QOQOQO6” LX 1 日 。 まあ + ム 6 
O00 る " 3 OOQOO* JMF INIT る 
QQQ6” ン ペ AAQAEBS: 
-* は 外部 参照 を 表す . 
日 
5/ ま 。 ma1n Outin ロ ee */ 
5 
1 Ca11 write (OO。 
050O6" GOQOO2 く さ ョ 』 
QQO6”" GOQO20』 
DO006”" BOO1As 
QOQ6” BOO13』 
OO0O6” 61 OOGOQO LXI B。OH 
QOQOO9” CS5 PUSH B 
OOOA" Q1 Q1D5S" LXI B。AOOQF 
QOQOOD”" 9 バ PUSH B 
OOOE ”* OQ1 QOQ2 LXT B。O2H 
QO11* 1 PUSH B 
0012* 11 QOOQ2" LXI D。AOOQ2 
OO15" に 1 POP B 
OO16" CD OOOO* CALL MRITE 
5 Ca11 write (O。 
OO19" O1 QOQQ LXI B,OH 


Figure-5.6.8 


PLMX の , その 他 の 多く の 機能 の 


ご ら 8 


M80 に よる アセ ンプ ブル で 生成 され た PRN 


紹介 は 省略 し ます . 


15。 


。 呈 モ a み に い る る) ョ 


時 ツ 


ファ イル の タイ プア ウト . 


9./ C 


5.7 .1 C と に つい て 


C は , 1971 年 に 稼動 を 始め た UNIX オペ レー ティ ング ・ シ ステ ム で 使用 する メイ ン の 言語 と し て 開 
発 さ れ ま し た . 
^UNIX”" と いう の は , ベル 研究 所 の Dennis Ritchie ら に よっ て 設計 され , 当初 は , DEC の PDP- 
11 上 に イン プリ メン ト さ れ た だ OS で あり , これ か ら の 16 ビ ッ ト , 32 ビ ッ ト コ ンピュータ の 共通 OS の 
1 つと し て , 注目 され 広まり つつ あり ます ( 注 :UNIX は , CPM や MS-DOS の 延長 線 に 位置 す 
る も の で は な く , 明らか に 使用 環境 が 異な る も の で あり , 両者 を 比較 する の は 意味 が あり ませ ん ). 
~C” は , 1970 年 に K. Thompson に よっ て 開発 され た “B? 言語 と 関係 が 深く , `C′ と いう 名 も 
next B" と いう 意味 あい で 付け られ た と 言わ れ て いま す . 

UNIX は , 1971 年 当初 は アセ ンプ ブラ で 書か れ て いま し た が , 1973 年 に 全面 的 に 自分 自身 の *C” に 
よっ て 書き 直さ れ て いま す . 

C が 使わ れ た 身近 な 例 で は , 多く の パー ソナ ル ・ コ ンピュータ に 採用 され て いる お な じみ の マイ ク 
ロ ソ フト BASIC が , アセ ンプ ブラ 記 述 で あっ た も の を 現在 , C に よっ て 書き 直さ る され て いる と 聞い て い 
ます . また , 同社 の 世界 最高 レベ ル の 簡易 言語 Multiplan” は C で 書か れ て いま す . 

これ ら の 事実 か ら も 分 か る よう に , C は シス テム を 記述 し た り , 言語 を 記述 し た り , 事務 用 プロ グ 
ラム を 記述 し た りす る こと が で きる 言語 で あり , さら に , アセ ンプ ブラ に 近い 記述 を する こと も 可能 で 
ある た め , 非常 に 幅広 い 分 野 で 利用 する こと が で きま す . 

言語 の 特徴 の 1 つ に , ソー ス ・ プ ログ ラム を トッ プ ・ ダ ウン (上 か ら 順 に , メイ ン ル ー チ ン つ サ 
ブル ー チ ン つ サブ ルー チン の サブ プル ー チ ンー その また サブ ルー チン つ …… と いう 具合 に 者 き お ろ し て 
いく こと ) で 記述 で きる こと も 挙げ られ ます . 


5.7.2 BD Software 社 C Compiler に つい て ' 

現在 , 入手 が 可能 な C 言 語 は , Whitesmiths 社 の も の と , Super Soft 社 の も の と , それ に この BD 
Software 社 の も の が 一 般 的 で す が , 3 者 の 中 で は , この BDS 社 の も の が 何と 言っ て も 使い 易い の で 
取り 上 げ て み ま し た . 

BDS 社 の C じ コン パイ ラ を 構成 し て いる 主要 な モジ ュー ル は , 


CC1 COM …… フェ ー ズ 1 の 段階 の コン パイ ラ . シン ボル ・ テ ー ブ ル と エン コー ド き され た ソ 
ー ス ・ コ ー ド を 生成 し し メモ リ 上 ある い は ディ スク 上 に 置く 。 コン パイ ル ・ 
エフ ー が な けれ ば 自動 的 に CC2 に 進む . 


ン ら 紀 


豆 栖 高 級 言語 に よる 同一 主題 ソフ ト 開 発 例 


CC2 . COM …… デア ェ ュー ズ さま の コン パイ ラテ 、 も に 3 で 中 雇 きれ か も に に ブ ァ イル を 人 才 上 し て 、 
^CRL” (C ReLocatable) フ ァイル を 生成 ,. リ ロケ ー タ ブル の オブ ジェ クト ・ 
アア 才 が 0 でき た る 。 cy 崩 

CLINK . COM… “CRL′ ファ イル と C. CCC (コモ ン ・ シ ステ ム ・ サ ブ プルー チン) フォ イル を 
リン ク し ,。 実行 可能 な “COM” ファ イル を 生成 する . 

お 組 、 し MM …… (CC2 で 生成 され た CRL ファ イル に 対し て 。 それ に 便 ま れる 各種 オ ァ ンク 
ショ ン を CRL" フ ァイル 間 相 互 で 移動 な どの 操作 を 行う ライ ブラ リア ン ( 後 
述 ) . 

CCCC……ttit| ラン タイ ム の 基本 ファ イル . コマ ンド ・ ラ イン 処理 , ファ イル 入出 力 バ ッ フ 
ァ や, 多く の サブ ルー チン な ど て で 構成 され て いる . CC2 で 生成 され た CRL" 
ファ イル と リン ク さ れ , 独立 し て 実行 可能 な "COM" ファ イル に 組み 込ま れ 


る . 
DEFF . CRL…… 標準 的 な 各種 ライ ィ イブ ラリ . CLINK に よっ て 。 メ イン “CRL” ファ イル に 組 
み 込 まれ る . 


以上 の 4 つの CUM" フォイ ル と た 。 標 台 ライ プラ リネ それ に ラン ・ タ イム ・ モ モジ ュー マール が あり 。 その 
組 に は 栖 馬 ラオ ォ オブ テリ を な だ の ソー スズ ス ぃ アマ ティ バル 。、 大 種 ユ ネー ティ サディ や ダー ム 和 を どの ゾ プ デ ネ ィ プ ァ 
イル が 含ま れ て いま す . 

BDS の C コ ン パ イラ の 出力 は 。 Super Soft 社 の じ コ ンマ イラ の よう に , ア セン プリ 言語 の ソー ス ・ 
コード で は な い の で 。 コン パイ ル 後 。 生成 され た アセ ンプ アリ 言 略 の ソー ス ・ コ ー ド に 手 を 入れ て , 細 
か な 操作 を する と いう 訳 に は 行き ませ ん . 

し か し , その 反面 , 大 変 使 い 易 く , C 言 語 を 学び な が ら 実 務 に も 応用 し よう と する 人 に は 最適 で は 
な いか と 思い ます . 

この CC 言語 は , UNIX 上 の C を 基 に , 重要 で な い 機 能 を 省き ,、 マイ クロ コン ピュ ー タ 上 の C と し て 
構成 され た , UNIX C の サブ セッ ト ・ レ ベル の も の で す . 


9.7 .3 BDS C に よる 「SAMPLE」 プ ログ ラム の 作成 


まず 。C に よる “SAMPLE“" プロ グラ ム の ソー ス ・ フ ァイル を 示し ます 。 ファ イル 名 の エグ イス テン 
ショ ン は ,。 必ず す し で な け 弘 ば を り ま せん 。 


A>TYPE SAMPLE.C C 告 語 の ソー ス ・ プ ログ ラム を タイ プア ウト . エフ ステ ンション は 和 め ず "C" と する . 


/*  BD Software に Compiler samp1le proOgram for "App1licCation じ P/M" 。 ま / 
ン * ネ ネン の 間 が コメ ント と な る . 


60 


mA&1n() 
て 
1nt 1。num。 モ mp s 


Dr1n も イ (" 学 n ま + フ すさ て 。。。。n = x")』/ キ Pr1int msq 
《n キー 1。、。。 250 ) 


Print (" 学 hinput n ロ 


nu = etnumber()』 
wh11 ら 呈 (num > 25O) て 


PF1nt す ("in ロ pDut n ロ 
れい mm = ロ GtnumbeFr() ぉ 』 } 


D ま の も す (ln1+ フ ャ うす 。 。 。 。 “ ) 』 

Pr1ntf ("Z さ d"。num) s 

PC は n ロ も ("= い )』 
tmD= ロ nums 


whi1 (一 -num) て 
te@mD = temD+nums 


PL1n ロ tf 
Pr1ntf 


("26d" 。temp)』 
(" 学 n")』 
} 


etnumber () 


復 数 の 文 を | | 
(ロロ ヒー ゴ 牧人 S ) 


/* 。 main と ロロ 上 1n ロ 呈 #/ 


> ググ ゲニ つ こう j- 填 - 木 ~ coso 2 %………" ce N 
き / 記号 は 本 米 は / ソン スン ソン. 
ーー>") る 、 日 本 の プリ ンタ で は *\*/ に な っ て | 
は 履行 を 表す 


/※ ロロ 己 モ number ま / 


で 囲む と 1 つの プロ ッ ツク に する こと が で きる 
ao 
/※ ロロ Fint msq ま / 


/※ Drint number #*/ 


/※ と a1 iCu1a キ 呈 | ず 4 


/* ネ DF1 ロ nt ぬ &n 免 い [ ※/ 
/% ヒレ On CFGGn #/ 


/# Gt numDer SuD ヒ Outin ロ ※/ この よう に サ プ ル ー 


それ が 使わ ね た 後 で 下 
こと ご が で きる . 


/※ 1OOK1n ロ "と レデ #/ 


/ ま Save@ 1n ロ Duffer #/ 
/ ま 1 ロ ヒ Fm 己 ロ モ DuUf す DOint ら rr */ 


/%※ COnver 上 to inteqger number */ 
夫 よ | く m " 倒 。 ) を 


/* し 上り ヒロ wi モロ 1n ロ teqer number */ 


て 
1n モ 上 DP。nmbs 
char numb。s=[5]』 
P = 0j 
while (numb !=*\ ロ 7) て 
numb = qetchar()』 
SLD〕 = numbs 
++P 3 } 
P = 0 
nmD = Os 
while (SLD] !=*\n" && sEp] >=YO> 1i 
nmbD = 1O * nmb + sgEp] 一 "O*i 
キキ ロ 』 }) 
と 己 モ いと ロ (nmb) 』 
} 
仙 > 
Figure-5.7.1 


人 次 に , BDS の C じ コンパ イラ の パッ ケー ジ の 中 か ら , “SAMPLE” プロ グラ ム を 作成 する の に 必要 な 


最低 限 の 各 フ ァイル を 示し ます . 


CC に よる SAMPLE" プロ グラ ム の ゾー ス ・ フ ァイル . 


ナン を 、 
義 す る 


6 1 


省 種 高級 言語 に よる 同一 主題 ソフ ト 開 発 倒 


QBiGTQAT ま .*/ 


RecCs Byte Ext CC 


6 11k 1 RG AICC1 CHM ご エー スズ 1] の コン バイ ラ . 

7Q 9k 3 R/B AACC2 POM フエ ー ズ / の コン リフ 

26 4k 1 R/M AiCLINK。COM リン フロー ダ . 

14 2k 1 R/M iC.CCC - 量 本 ラン タイ ム へ ・ モ ジュ ユー ル . 

フフ 7 10k 1 R/M AkDEFF.CRL 擦 準 ライ プラ リノ . 

1O 2k 1 R/M AsBAMPLE 。C SAMPLE* の ソー ス ・ プ ログ ブラム. 


Bytes Remaining Un As 20 さ 3 ド 


旨 や シン ソ 


Figure-5.7 .2 BDS の C に よる “SAMPLE" ブログ ラム の 開発 に 必要 な 最低 限 の 各 フ ァイル . 


で は , コン パイ ル の 作業 か ら 始 め ま す . 
BDS の C は 。 実行 可能 な 純 マ シン ・ コ ー ド ・ フ ァイル を 作成 する まで の 手順 が 非常 に シン プル で あ 
る の が 特徴 の 1 つ で す . 
コン パイ ラ の 実行 と 。 生成 され た ファ イル の 確認 例 を 次 に 示し ます . 
A>DIR SAMFLE.*) ーー 最初 の YSAMPLE* フ ァイル の 人 認 . 


人 Qs SAMPLE 2 ソー ス ・ フ ァイル の み 存 在 . 


A>CC1 BAMPLE。C/ フエ ー ズ 1 の コン パイ ラ の 実行 、 


BRD Software に COompDi1er v マ 1.4 さ a ( ロ aFt 1) 
2SK unused フエ ー ズ 1 の コン バイ ル 完 了 ず 、 
BD Software C Compiler v1.4 さ (part IiI) 自動 的 に フェ ー ズ 2 の コン パイ ラ (CC2. COM) 


コン パイ ルル 成功. エラー な し . 
A>DIR _ SANPLE.&/ 生成 され だ ファ イル の 胡 認 . 
As SAMPLE 記 : SAHPLE CRL 


。 ーー デイ ル 生成 され た リロ ケー タプ ブル. オブジェ フト ファ イル 


Figure-5.7.3 BDS の C と に よる コン パイ ラ の 実行 と 生成 され た ファ イル の 確認 . 


^CC1 . COM” に よる フェ ー ズ 1 の コン パイ ル が 終了 し た 時 点 で , 自動 的 に “CC2 . COM”" に よる フ 
ェ ー ズ 2 の コン パイ ラ が 起動 され 実行 きれ まし た (スイ ッ チ に より , 別 々 に 実行 する こと も 可能 で す ). 
これ に より 。 リロ ケー タブ ル の オプ ジェ クト ・ フ ァイル “SAMPLE . CRL” が 生成 され て いま す . 

次 は リサ リンク ・ ロ ー ダ の 実行 で す 、 る SAMPLE 、 CRL" に ,。 C.CCOC と DPEFF、CRL を リンク 

し ます . その 実行 例 を 決 に 示し ます . 


ど と 4 っ アノ 


FORTH 


A>CLINK_SAMPLE )/ リン フロ ー ダ の 実行 . パ *SAMPLE^ に い C. CCC と ^DEFF. CRL/ を リン ク す る . 


BD Software じじ Linker v1 。4 く 
Linkage Compl1ete 
る 2K ] ら 人 t Over 


リン グ 完 了 . 
A>DIR _ SAMFPLE。* ) 生成 され だ ファ イル を 確認 する . 


人 Qs SAMPLE に s SAMPLE CRL s SAMFLE CDN 
生成 され だ 実行 可能 な 
純 マ シン ・ コ ー ド ・ フ ァイル 
A>BsSTAT SAMPLE.CDM) ~SAMPLE. COM* の ファ イル 傘 才 を 調べ る . 


Recs Bytes Ext Acc 
の 4 に 1 ド R/M Az:SAHPLE 。 CDM - 4K バ イト 長 で ある . 
Bytes Remaining Un 人 Qs さ Ok 


仙 > 


Figure-5.7 .4 リン グー ロー の 実行: SAMPLE. CRL” に エラ イヴ ラリ を リサ ンク す ぁ あ 。 


以上 の 作業 で , BDS の C に よる 実行 可能 な 純 マ シン ・ コ ー ド の ファ イル が で き 上 り ま し た . で は そ 
の “SAMPLE” プロ グラ ム を 実行 し て み ま し ょ う . 


QA>SAMPLE ) "SAMPLE" プ ログ ラム の 実行 . 


1 ャ ズ オ さ ナオ 。。。。)  x 
1 内 Du も ロロ (n = 1。。。250) ーー> さ SO 』 --- 254 以 上 な の で 入力 値 エ ラー. 
tnPuU も ロ (n = 1。。。.25SO)  -->2OO / - - 今回 は 正しい 値 を 入力 . 


1 + つ すさ +。 。 。 。 200 = 20100 入力 値 と 答え が 出力 され て いる . 


人 > 


Figure-5.7.5 BDS の C に より 作成 され た SAMPLE” プロ グラ ムク グ の 実 行 . 


BDS の C じ の, その他 の 多く の 機能 の 紹介 は 省略 し ます . 


5.0 FORTH 


5.8.1 FORTH に つい て 


FORTH は , 1969 年 に , 米国 バー ジニ ア 州 の 国立 電波 天文 台 で 。 観測 半 置 の 自動 化 を 行う た め の 適 
当 な プロ グラ ミン グ 言 語 が な か っ た た め , Charles H. Moore に よっ て 新た に 開発 され た 言語 で 
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Moore は その 後 。FORTH 社 を 設立 し ,。 ミ ニコ ンピュータ や マイ クロ コン ピュ ー タ 用 の Poly FORTH 
な どの 製品 を 発表 し て いま す . 

FORTH は , 本 章 で 取り 上 げた 他 の コン パイ ラ 言 語 と は , 文法 や オブ ジェ クト 構造 が 大 きく 美 な り , 
*ALGOL の 流れ を くむ “とか, “PL ノ I と PASCAL の 中 間 的 な も の ” と 言っ た よう な 表現 が で き 
る 種類 の も の で は あり ませ ん . 

還る 時 本 っ て な よ で っ すべて の 間 昌和 は クック 本 も こい 
ます (スタ ッ ク と は ,。 アセ ンプ ブリ 言語 の "PUSH”, POP” と 同じ 原理 で す ). ま た, スタ ッ ク 言 語 

ある た め 。 その 文法 は 必然 的 に 逆 ポ ー ラ ンド 記法 と な っ て いま す (^2 十 3” を 逆 ポ ー ラ ンド 記法 で は 
ンー 所 

FORTH の 記述 法 は , 構造 化 ア ログ ラミ ング の 最たる も の で あり , すべ て が モジ ュー ル 定 義 の 形 を 
と り ,、 メイ ン ル ー チ ン ,。 サブ ルー チン , 関数 , 演算 子 と いっ た 区 別 は あり ませ ん . 

FORTH は . シス テム が 記述 が で き , か つ ア セン ブラ に 近い 記述 が 可能 で , 制御 用 プロ グフ ラミ ング 
に も 適し た 非常 に オブ ジェ クト 効率 の よい コン パイ ラ と し て 注目 され て いま す . 


5.8.2 Rgy FORTH に つい て 


Rgy FORTH は 。 Z80 バ ー ジ ョ ン を 「FZ80」, 8080 バ ー ジ ョ ン を 「F80」 と 呼ん を で いま す が , ここ 
で は Z80 バ ーション の FZ80 を 使用 し ます . 

Rgy FORTH は , 純 国 産 の FORTH 言語 で あり , 現在 入手 可能 な 他 の FORTH に は な い ,。 いく つ 
か の 特徴 を 持っ て いま す . 


中 


@e FORTH 言語 と 言う より , FORTH 言語 も 記述 で きる アセ ンプ ブラ と 言っ て も よく , FORTIH 
語 を 使わ な けれ ば ,。 全く の アセ ンプ ブラ と し て 動作 する . 

@ 現時 点 で は , お そら くく 最速 の FORTH で ある . 

@ ア ドレ スプ オ ブ ジ ェクト を 含ん だ 完全 な コン パイ ル ・ リ スト を 出力 する . 

@ FORTH ワー ド 中 か ら の アセ ンプ ブラ ・ プ ログ ラム の 呼び 出し , また は その 逆 の 呼び 出し を 任意 の 
タイ ミン グ で 何 回 で も 行う こと が 可能 

@ 拓 り 込 み 処理 を FORTH レベ ル で 記述 で きる . 

@CP ン M の DDT と コマ ンド ・ コ ン パ チ で , コン パイ ル 後 の オプ ジェ クト を , シン ボリ ッ ク に 対 
話 形 式 で デバ ッ グ で きる デバ ッ ガ , “EDT” が 付属 し て いる 


な ど 、 この Rgy FORTH の 開発 者 が 従来 の FORTH に 満足 せ ず , きら に マイ クロ ・ プ ロ セ ッ 肝 に 策 

着 し た . アセ ンプ ラ に 替り 得る 高級 言語 を ター ゲッ ト と し て いる こと が よく 表れ て いま す . 
PL/M の 項 で も 述べ まし た が , マイ クロ プロ セッ サ に 密着 し た プロ グラ ミン グ 言 語 で , オブ ジェ ク 

ト の 小さ いこ と 複雑 な 割り 込み 処理 その 他 で , 現時 点 で PL/M に 対抗 で きる の は , この Rgy FORTH 


ど 4 こ フリ 


FOR 「H 


が その 筆頭 と 言え る で し ょ う . 


5.8.3 Rgy FORTH に よる 「SAMPLE」 プ ログ ラム の 作成 


ます 。 Rgy FORT 月 に よる SAMPLE" プログ ラム の ジー ス ・ プ ファ イル を 示し ます .。 切 学 較 ル 名 
の と ダメ ステ アジ ション は 、 必ず ド 開 や を あけ は れん れ ば な か 人 は ませ ん た 、 


A>TYPE SAMPLE。F8O - ファ イル 名 の エク ステ ンション は , 邊 ず "F80 "と する . 
\ 。 Rgy FOURTH sample progrem for "application CP/N" まき ーー 当 は 本 来 は パッ ンス ラッ シス , 


クラ ライ - わり まで は コメ ント と な る .  w と あの ム が あの プリ レンツ 
0 で は す と な つて し まつ . 
まま し * SANPLE PROUGRAN* 


READLIB カー ネル ( 核 ) と リン フ す る 擬似 命令 . 
DUP 2FH > SMAP さ QH < FAND 』 入力 コー ドガ が 09 で ある か を チエ ッ フ す る ワー ド . 


B \\ENTRY TOPiASCII NIBL 
学 EXIT TOPgz1/O(1=OK) 
党 2NDg BINARY DATA 
DUP ?O-9 
OX - 。.1 
ELSE DROP。 O 
THEN s 


1 桁 10 進 ASCIH- バ イナ リ 変 換 の ワー ド . 


CONBUFF DS 本 + 2 
s ISTRING >NUMBER 学 EX1T TOP1/O 


党 2ND:i BINARY DATA 
(CUNBUFF + 2) >R 


Q 
BEGIN 
IT B9 ASCII-BIN 
IF SMAP 1O * + 


2 4 す 4 2 ASCI 文 字 列 を 10 進 文字 と し て , 
REFEAT これ を パイ ナリ 値 に 変換 する ワー ド . 
交 み 時 ⑳ DW 文字 列 の 最後 が CR で ある か の チエ ッ ン . 
IF 2DUP Q > SMAP 251 < FAND 


まま 
ELSE DROP Oo 
THEN | が を チエ リッ ソン 。 
ELSE DROP O | 
THEN 3 
MSG_INPUT 
DB "input n (n = 1。。.25O) ーー>0O* 
s [INPUT_NUMBER | 汗 EXIT TOPsi1/O 
学 2ND』 BINARY DATA 
BEGIN 
PRCRLF 。 MSG_INPUT PRS CRZLF と メッ セー ジ の 出力 . " - 
4 CONBUFF RD_CONBUFF コン ソー ルカ ら 1 桁 入力 . きい 
IF STRING >NUMBER 
ELSE Oo 
THEN | 
UNTIL 』 
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s IPRD+] 


\\ PRINT DECIMAL _ NUMBER MITH NOU SFACE \ 
BIN-DEC 
DECBUFF 
BEGIN 
DUP BS 2OH = 
1 2 

REPEAT 
PRS 5 


CALCULATE 1 +2+ さ +。。。 


ENTRY 
学 EXIT 


・ ロ TOF'』 NUMBER 


O 
SMAP Q DO 

[ 1+ + 
LOUOP is 


MSG" 1 + キ 2+ さ + す 。。。。" ョ 
MSG"n_ =_x"s 


s |SQAHPLE 
PRCRLF PRCRLF- -- 衝 帰 ・ 
MSG "1 ナ う 2 ィ + う て 。。。。 "PRS 


DB "1+2+ ィ さて 。。。。 OO” 


DB "n = xZ00* 


改行 を 2 回 . 
MSG"n = x" 
_INPUT_NUMBER PRCRLF PRCRLF 
MGB" 1 +2+ さ +。。。。" 
DUP PRD+ CD PRSPACE 
CALCULATE_ 1+2+ さ +。 。。。n PRD+ 


PRS 


べ だ も の . 


PRCRLF s 


SAVELnC 

RECOVOBJ 

10OH 
HL。SAMFLE。 
SF 。 1OOH 、 
IY。1OQH - 4OH て 
EXFDRTH 
JP O 
LOADLQC 


常 じ P/M REBOOT 


SAVEL 1IB 
END 


と 学 | 


Figure-5.8.1 


\ENTRY TOUFPi BIN 


| 


TOP: SUM DF 1-N 


部 ガ びそ れ ぞ れ の FORTH ワ フー ド で あり の , 最 下 位 ワ ー ド か ら 順 に 定義 し て 行き ます . 


Rgy FORTH に よる SAMPLE" プロ グラ ム の ソー ス 


削 置 の 0, 前 置 の スペ ー ス を 抑止 し だ 


10 進 プリ ント アウ ト の ワー ド . 


1 
| n ま で の 総和 の 計算 の ワー ド . 
| 


2 ー チ ン に 当る も の ). 
今 ま で に 定義 され て いる FORTH ワ ー ド を 並 
PRG5 | 


| 当 プ ログ ラム の スタ ー ト - ル ー チ ン を 
WEXECUTE FORTH MnRD | アモン ブフ て 書い た 


を っ 人 /。 


この よう に FORTH の 文法 は COBOL や PL プ I な ど と は 全く 雰囲気 が 異な っ て いま す . 


Rgy FORTH の パッ ケー ジ の 中 か ら , 
ァイル を 次 に 示し て お きま す . 


^SAMPLE” プロ グラ ム を 開発 する の に 必要 な 最低 限 の 各 フ 


この 中 の “CPMCON . HEX′ は , あら か じ め そ の ソー ス ・ フ ァイル “CPMCON . F80”" か ら 作 成 


し 交 本 共 ま す 。 


の 4<1<) 


FORTH 


人 QR:BsGTRAT #※。 ネ / 


RecC5 Bytes Ext Acc 


1 42 18k 1 R/M AFZ8O。COM コン バイ ラ . 

44 6 1 R/M AzCPMCON。HEX CPM コン ソー ル | O ラ イブ ラリ リノ. 
60 Bk 1 R/M AzFDT。COM - デバッガ (直接 は 和 め 要 な い ). 

12 2 ト 1 R/M AzSAMPLE。FBO SAMPLE* の ソー ス ・ フ ァイル . 


Bytes Remaininq Un Ag 266 ト 


> 


Figure-5.8.2 Rgy FORTH に よる “SAMPLE" プロ グラ ム の 開発 に 必要 な 最低 限 の 各 フ ァイル . 


さて コン パイ ル の 作業 を 始め ます が , Rgy FORTH は コン パイ ル 時 に 各種 ライ ブラ リ も 同時 に リン 
ク で きる の で , この 場合 は ,、 CPM の コン ソー ル 入 出力 ライ ブラ リ "CPMCON . HEX” を コン バイ 
ル 時 に リン ク し ます . 

また,。 ソー スズ ス ・ ブ ログ ラム の 最 下 部 で , 当 プ ログ ラム の 起動 ルー チン が 定義 され で お り . (プロ グラ 
ム の 超 動 ルー チン まで 定義 で きる こと は , 他 の コン パイ ラ に は な い ゆい 特徴 の 1 つ )、 コンパ イラ の 出力 は , 
すでに 絶対 アド レス を 持っ た オプ ジェ クト ・ コ ー ド と な っ て いま す . 

コン パイ ラ の 実行 例 を 次 に 示し ます . 


>DIR GAHPLE.*) 最初 の "SAMPLE" フ ァイル の 確認 . 


人 n。 SANPLE FBO ソー ス ・ フ ァイル の み 存 在 . 
に コン VTAMF 関 生 に リン クラ タラ 1 マリ 


Aa>FZ8O_SAHFLE CPMCON/ コン バイ ラ の 実行 , コン バイル と 同時 に , CP_ M コ ン ソ ー ル 
1 0 ライ ブラ リ の "CPMCON. HEX^ を リン する 。. 

RIGY CO。 ZBQO FOURTH COMPILER "FZBO V2.O" 1 ビ H2O5159 

PASS1 . END 

PASS2.END 

NEXTPC=OQ フ ABH NE XTDF=O フ 7ABH FRKEESYMNO= 1 さる 66 

CDMPLETE COMPILATION 


コン バイ ル 成 功 . エ ラー な し . 
A>DIR SAHNFPLE. ま / 生成 さま ね だ ファ イル の 確認 . 


人 sz SAMFPLE FBO 』 SaNMPLE HEX 』 SAMFPLE PRN 』: SQMPLE ERR 


ソース ファ イル 生成 され だ イン ツテ ル HEX 形 の 生成 され だ リス ト / エラ ニー イツ フタ メータ 3 アプ ァイル 


> オプ ジェ クト ・ フ ァイル ノ ファ イル (この 場合 は , エラ ー な し な の で 中 身 は 空 ) 

Figure-5.8.8 Rgy FORTH の コン バイ ラグ の 実行 と 生成 され た ファ イル の 確認 . 
コン パイ ル は 成功 し て , HEX 形式 の オプ ジェ クト ・ フ ァイル が 生成 され て いま す . この ファ イル は 
CPM の DDT や Rgy FORTH の FDT な ど で , メモ リ 上 に 実行 可能 な 純 マ シン ・ コ ー ド と し て ロ 


ー ド で き , また , CPM の LOAD コマ ンド で 実行 晴 能 な “COM” ファ イル に 変換 し て 。 ディスク 
に セー プ す る こと が で きま す . 
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次 に , CPM の LOAD コマ ンド グ の 実行 と 生成 され た ファ イル の 確認 例 を 示し ます . 


ーー = me TRYPRPPremm PPPSRPEPPPPPP 二 PP ーーー - ーーーーーーーーーーーーm ヤ へ へ 


/ 人 >BiLUAD SAMFLE) CP_ M の LOAD コ マン ド 実 行 SAMPLE. HEX? か ら *SAMPLE.COM “を 生成 する . ` 


FIRST ADDRESS O1OO 
LAST ADDRESS 07A7 
BYTES READ 069A 
RECORDS MRITTEN OE 


LCAD コ マン ド 終 ?. 
>DIR SAMPLE.*) 生成 され だ ファ イル の 人 確認. 


ns SAMPLE F ヨ O 』 SAMFLE HEX 』: SAMPLE PRN 』 SANMFPLE ERR 
QA SAMPLE COUN 


へ ヘ ハ ベ ヘス へ 


実行 可能 な 純 マ シン ・ コ ー ド の ファ イル が 生成 され だ 。 
人 A>BsSTAT SAMFLE .COM 』 ^SAMPLE COM* の ファ - イ ル 容 時 を 調べ る . 
ReCs Bytes Ext cc 


14 ど 4 1 R/M AiSAMPLE 。 CM 2K バ イト 長 . 本 草 で 尼 り 上 げ だ コン パイ ラ の 中 で 最も コン パト. 
Bytes Remaining On Ag 246k 


N 仙 > ノ 
人 2 2 6 ASAN 2 55 ン 


Figure-5.8.4 コン ノバ パイル に より 生成 され た “HEX” ファ イル に 対し 。 LOAD コマ ンド の 実行 . 


この よう に 才 の コン バイ ラ と 擬 / 二 し て, 大変 コン クト な オデ ジュ ォ ク ホ ド ュ > フィ ァイル の で きり まし 
だ た . 本 章 で 取り 上 ば げた 言語 の 中 で は 最小 で す . 
で き 上 っ た "SAMPLE′ プロ グラ ム を 実行 し て み ま し ょ う . 


A>SAMPLE 』 ^S ら AMPLE“" プ ログ ラム の 実行 . 


4 そ プス キ うさ て 。。。、D 呈 X 
1n ロ Du も mn (n = 1。。。250) ーー フ > う OO / 254 以 上 の 入力 値 の エエ ラー. 
1nDut ロ (n ロ = 1。。。25O ) ペー ツ だ 04) 2 再度 正しい 値 左 入力 . 


1 +2+ さ +。 。 。 。 250= さ 1375 入力 値 と 答え が 出力 され て いる . 


人 > 


6 NR 


/ 
/ 
に 


ーー ーー 


Figure-5.8.5 Rgy FORTH に より 作成 され た SAMPLE" ブロ グラ ム の 実行 . 


次 に 参考 まで に , Rgy FORTH に 付属 の デバ ッ ガ で ある FDT の 実行 例 と , コン パイ ル に より 生 
成 さ きれ だ リス ト ・ フ ァイル “SAMPLE . PRN” の 一 部 を 示し て お きま す . 


の 4<{ こ ] 


FORTH 


に シン ポリ リッ ソフ に デバ パッ グ が 可能 と な る よう に , シンポ ル ・ テ ー ブ ル を 読み 込む . 
>FDT SAMPLE.HEX 8J *SAMPLE. HEX" に 対し て FDT を 起動 . 


RIGY CO.。 Z8BO FURTH DEEBUGGER "FDT(ZBO) V2.O" 
Q100-ーO7 フ AZ NEXT=07AB PC=OOOO SAVE= 3 FREEMQAX=A3D ヨ (SYMBOL 1N) 
ーw 等 下 ---- FORTH ワ ー ド を 実行 する コマ ンド . 
ーー 8" IP0-91 ASCII の 0ー9 を チェッ ク す る . 入力 と し て “8" を 与え だ . 
*FURTH RETURN* 
PS(AEFE) OOO』 リマ ターン され だ 値 は ` 真 "で ある . 
ーーwF "AA 2?0-9 今回 は "A" を 与え だ . 
\FURTH RETURN* 


PS (AEFE) OOOO リマ ター ン さ れ だ 値 は ` 念 “で ある . 
-wF "5 [ASCI1-BIN| ASCl 一 パイ ナリ 変換 の ワー ド . 入力 と し て ^5" を 与え だ . 
*FDRTH RETURN* 
-=PS(QEFC) OOQ5 QOQO1 
ーー 証 *。 4 変 抽 OK 
A> | ーー 一 変換 され だ 値 . 
ーーー- GtF に O で OP バ M に 戻る . 


Figure-5.8.6 Rgy FORTH デバ ッ ガ FDT の 実行 . 


QA:TYFE SaANPLE.PRN / 


RIGY CO。 Z8O FOURTH COMPILER "FZBO V2.O" 1 コロ CO らら 15 ワ PAGE 1 


常 KRq ロ y FURTH samp1 DrOdFLm OF "QRDD11C 
ation CP/M' 


ます し に 7 GAMPLE PROUGRAN“ 
READLIB 


O6S5A』 EDD O2 さ 7 O15C OO2F QOS351。。 』 ?20-9 DUPF 2FH > SMAP 3QAH < ヾ FAND 


II NIBL A 
\EXIT TOP 1/O 
( 1 = ロ K ) 
\2NDs BINARY DAT 
は 1 
Q672』02 さ 7 Q65an 9 に ロー タ 
0676s0171 QOQQOO O1SC OOSO OO2D6・。 <。 4 だ の ーー 。』 
O6B23O17A OOOO 0O25S3 O16B ELSE DROP。 O 
O68A』 O1 SE THEN 5 
07-1- 1 の CUNBUFF DS 往 + <Z 
O692』4 EDD 5s STRING>NUNBE ド 学 EXIT TUF s 1 / 〇 
\2ND& BINARY DAT 
谷 


| 
O670』 E9DD s SCI エ 一 BIN 党 ENTRY TOUF』 ASC 
| 


0694:015C QO6BE O295 (CUNBUFF + 2) >R 


スー1 ご | 


可 醒 高 級 言語 に よる 同一 主題 ソフ ト 開 発 倒 


RIGY CO。 ZBO FORTH CUDMPILER "FZBO V2.O" 182O5S159 PAGE さ 
SANPLE PRUGRAN 


まさ ネネ SYMBDL 一 TABLE *%※※ 


ま F O1D2 生生 +LUOP F_ QO1CO 委 ま ー1F F O182 
生ま あじ OLON F EDD 和 ま も DO F QO189 も ま ELSE F QO17aA 
も FALSE F O16B ト た 3 ココ た 01/1 委 ま MP F O17 ム A 
和久 ま も LTITERAL F 01S5C まま も LOOP F O19E 征 和 REPEAT F Qi7A 
も も GENMI F QO1SE まま も TRUE F O165 生ま UNT1IL た の / ほ 5 
し F Q2F9 + F Q2CF + ! F QO2Q06 
GM ! F 0O21E SM ゆい AB F 

GMAP F Q25A 


NE XTPC=Q フ ABH NE XTDP=OQ フ ABH FRKEESYNMNO= 
COMFLETE COMFILATION 


合う > 


Figure-5.8.7 リス ト ・ フ ァイル の タイ プア ウト . 
Rgy FORTH の , その 他 の 多く の 機能 の 紹介 は 省略 し ます . 
5.9 LISP 


5.9.1 LISP に つい て 


LISP は , 1960 年 に 出版 され た John McCarthy に よる ,「Recursive Functions of Symbolic 
Expressions and Their Computation by Machine」 と いう 著書 が その 基本 と な っ て お り , 同年 に は 
最初 の LISP が すでに 稼動 し て いま す . この LISP は 現在 で は , 純 LISP と 呼ば れ て いま す . 

LISP の 特徴 は , 第 1 に リス ト 処 理 で す . その リス ト 構 造 は , COBOL や , FORTRAN, PL ノ I な 
ど で は 書き 表せ な い , 実行 中 に 動 的 に 変化 する デー タ 構 造 を 再帰 的 に 定義 むす る こと が で きる も の で す . 

LISP は , 数 式 の 記号 的 な 処理 . コ ンピュータ に よる パズル の 解読 や 定理 証明 な どの 人 工 知能 研究 の 
分 野 に . な く て は な ら な い プ ログ ラミ ング 言語 と し て 広く 使わ れ て いま す . 

LISP は , 整数 , 実数 文字 数 , 配列 な どの デー タ の 型 の 区 別 が な い 単 一 デー タ 形 式 で あり 。 ま た., 
し SFP の ブロ グラ ム を LISP の デー タ と し て 処理 し て 。 プ 名 グラ ム と し て 実行 する と いう よう な に と 
も 可能 で す . 


LISP は , 一 度 作 られ た デー タ を 書き 換え る こと は な く < く ( 純 LISP), 書き 換え が 必要 な 場合 は , 旧 


ンプ 0 


L | ら ビ 


デー タ は その まま に し て , 新 デ ー タ を 新しく 作っ て 使用 し ます (LISP 1.5 に は , 書き 換え の 機能 あり ). 
で の だ がめ メモ サ を どん どん 潜 費 し で て し まう の で ぞ 。 'Garbage Collect : ガー ベジ ・ コ レク ト “ と 呼ば 
れる 不用 ゲー タ の ゴミ そう じ ” の 機能 を 持っ た シス テム ・ サ プ ブルー チン が 用 意 き され て いる の も 特徴 
に 」 

いずれ に し て も LISP は , 一 般 的 な 言語 と 相当 に 趣 を 異 に する も の で あり , COBOL や FORTRAN 
の プロ フェ ッ シ ョ ナル と 言え ども , 最初 し ば らく は と ま ど う ご と に な る で し ょ う - 

現在 , LISP と 言え ば 普通 , LISP 1.5 ( 純 LISP に 庄 機 能 を 追加 し た も の ) を 指し ます . 


59.9.2 The Soft Warehouse 社 muLISP に つい て 


muLlSF は 、 LISP 1.5 に いく つか の 機能 を 追加 し た LISP 1.5 の 上 位 コ ン パ チ ブ ル に 当たる LISP で 
す . | 

muL1SF の 最初 の バー ジョ ン は , 1977 年 に 発売 され た muLISP-77 で あり , その 後 1979 年 と 1980 年 
に 大 き な バ バージョン ・ ア ッ プ が 行わ れ , 現在 は , muLISP-80 と な がら そい いま あす ここ 富 表 り 上 た の は 
muLISP-80 で あり , これ は 従来 の muLISP に 。 さら に 多く の コー ド と 高速 処理 を 実現 する た め に ., 
苦 似 コー ド ・ コ ン パ イラ と イン ター プリ タ を 追加 し た も の で す . muLISP の 特徴 は , 


@ 合計 85 の LISP ファ ンク ショ ン が , マシ ン 語 で 定義 きれ て いる 」 

9 2 パス の コン パク ト な が ガー ベジ トコ シク タ が 用 意 さ れ て お り , デー タ ・ ス ペー ス の ず すべ て の メモ 
リ を ダグ ダイナミック に 管理 し 。 さら に ガー ベジ ・ コ レク ショ ン の 実行 後 。 自動 的 に デー タ の リロ ケ 
ーション が 最適 と な る よう に ダイ ナミ ッ ク な メモ リ 操 作 が 行わ れる . 

@ エ デイ タ と トレ ー ス の 会 話 形 レジ デン ト ・ デ バッ ガ が 付属 し て いる . 

@$ ファンクション 定義 は , 自動 的 に リコー ド (distilled-code) に コン パイ ル さ れ ,。 メモ リ の 節約 と 
高速 化 を 可能 と し て いる . 


な ど で あ り , muLISP は 中 間 コ ー ド (D コ ー ド ) に コン バイ ル し た 後 。 イン ター アリ タ で 実行 する 
と いう 形式 を と っ て いま す . 


9.9.3 muLISP に よる 「SAMPLE」 プ ログ ラム の 作成 


まず, muLISP に よる “SAMPLE′ プロ グラ ム の ソー ス ・ フ ァイル を 示し ます . ファ イル 名 の エク 
ステ ンション は 何で あっ て も 実行 に は 関係 あおり ませ ん が , “LIB/ が デフ ォ ー ル ト に 指定 され て いる の 
で 。 これ に 従い ます 


が デメ ミ 


名 種 高 級 言語 に よる 同一 主題 ソフ トド 開発 姜 


OH RSS nw 
3 、。 2 
A>TYPE SANPLE.LIB ファ イル 名 の エフ ステ ンション は 何で あつ て も よい が , 
*LIB* が デフ オー ルト に 指定 され て いる . ! 
ん muLISF samp1eG DFrOgFLam f 〇 ロビ "App1lication CP/ZNPD な 
"5 の 間 が コメ ント と な る . 
(だ RS > Definition of DEFUN %X 
(PUTD DEFUN (QUOTE | 
(NLANBDA (FUNC DEF) 関数 YDEFUN“ の 定義 . 


(PUTD FUNC DEF) | 
HL 0 


EDEFUN SAMPLE (LAMBDA (N NUMB TEMP) 


(TERFRI ) ん に た RR も し F と ん 
(FRINT "1+2+ ォ さす 。。。。n ぷり ) ん thtlie ん 
(LUOP (PRIN1 "input n (n = ニー 1。...2 ら 0 ) ーー>") ん prOmpt mes5aqー ん 
(SETQ N (READ ) 〉 ん input n 2 
( (QAND (NUMNBERP N) ん is number ? ム ん 
(PLUSP N) ええ Qn > り ぞ 4 
(LESSP N 25S1)))) ええ い く 20 / 4 
(SETQ TEMP (SETQ NUMB _N)〉) ん TEMP 』= NUMB #』=n ん 2 、 
(LOOP (SETD NUMB (DIFFERENCE NUMB 1)) NUMB 』= NUMB 一 1 %X SAMPLE' の 定義 . 
((ZEROP NUMB) ) ん if NUMB = QO then exit 2 ん 
(SETQ TEMP (PLUS TENFP NUMB) ) ) ん TEMP 』:= TENMP + NUNBE 
and repeat ム ん 
(TERFR1 ) 
(PRIN1 "1+2+ さ +。。。。 ") (PRIN1 N) ん print messaqe and N ん 
(PRIN1 " = ") (PRINT TEMP ) ん print ans い er ん 
(TERPRI 〉 


(SYSTENM] - 最後 に CP ~M に 戻る だ め の フ ァ ン フシ ヨン . ん return to CP/N ん 
ESAMPLE (RDS」  - ヾ SAMPLE" の 実行 . ん ex と いも PrOgram ん 


> 


Figure-5.9.1 madSPD に 上 る * の MPEE" プロ グ ゲ グラム ん の ソー ス ・ プ ャ 4 . 


次 に 。muLISP の パッ ケー ジ の 中 か ら , *SAMPLE′ プロ グラ ム を 開発 する た め に 必要 な 最低 限 の 
ファ イル を 示し ます . 


AA WW 
QA>BsSGTAT %。*/ 
RECS BYTES EXT ^ACC 
8O 1OK 1 R/M _ AAPLLBP。COM コン シバ イラ バイ ンマ ー プ ブ リタ 、 
1 25 1 6 に 1 R/M AMUSTAR 。 SYS - - ス フリ ー ン エディタ デバ ッ ガ . (直接 に は 和 め 要 な い ) 
1 1 と. 1 R/M AiBAMPLE。LIB SAMPLE" プ ログ ラム の ソー スズ ・ フ ァイル . 
BYTES REMAINING UN sk 21SK 
> 
II び ュー ニー ンジ 


Figure-5.9.2 muLISP に よる *SAMPLE′ プロ グラ ム の 開発 に 必要 な 最低 限 の ファ イル . 


二 あ 


し | ビ 


muLISP は , 中 間 言 語 の イン ター プ ブリタ な の で , まず イン ター プリ タ (中 間 言 語 へ の コン パイ ラ を 
飼 宇 ) を ロー ド し て 。 そ の 上 で ソー ス ・ フ チチ 咽 形 を 守 み 半 ん で 、 そ の まま プロ グラ ム の 実行 に 移り ま 
す . よっ て ,。 コン パイ ル や リン ク の 作業 は 必要 あり ませ ん . 

"SAMPLE" プロ グラ ム の 実行 例 を 次 に 示し ます . 


A>MULISF ) イン ター プリ ダマ 〈 中 間 言 語 へ の コン パイ ラ を 全 お ) を 起動 . 
muLi ら SP-BO 2。15 (O さ /O1 / ヨ 2) 

Standard CFP/NM Version 

Copyright (C) 1981 The SDFT MAREHOUUSE 


Licensed by MICROSOFT 。 Inc。 


委 (KRDS SANFPLE LIB)) イン ター プリ タ ガ が 起動 する と , プロ ンプ ト の ^S/ ガ 出力 され る . 
SAMPLE RDS(Fredirectior) で , 入力 を マン ソー ル か ら ^SAMPLE.LIB? フ ァイル に 変換 する . 
ファ イル 名 の ^. “を 書い て は いけ な い . 


る | この 間 に , 自動 的 に ソー ス ・ フ ァ 


イル が ロー ド さ れ , 中 間 言 語 に コ 
シン バイル され イン ター プリ タダ に 


よる 実行 が 開始 され る . 
旬 
4 と キキ う も 。。。 こ 的 き 
4nOM も 0 《(P m 1。。。28O ) ーー>280 ) 251 以 上 の 入力 値 エ ラー. 
1nDut n ロ (n = ニー1。。.25SO) ニー>100 】 今回 は 正しい 入力 . 


1 すろ + さ +。 。。、。 100 = SOSO  - 入力 値 と 答え が 出力 され だ . 


ーー こ ヽ ンー ンー ペン 


ーー ンー 


Figure-5.9.3 muLISP に よる SAMPLE" ブロ グラ ム の 実行 例 . 


谷 > 


muLISP に は , LISP ブロ グラ ム の 開発 の た め に , muSTAR と 呼ぶ Artificial Intelligence 
Development System(AIDS) が 付属 し て いま す . この ツー ル が Figure-5.9.2 の "muSTAR. COM” で あり , 
この AIDS に より LISP ブロ グラ ム の 作成 に 適し た スク リー ン ・ エ ディ タ と トレ ー ス 機能 を 持っ た 
デバ ッ ガ 。 それ に ディ スク ・ フ ァイル の 操作 な ど が 可能 と な り ま す . 

委 考 まで に , muSTAR を 起動 し て , 最初 の メニ ュー 画面 を 示し て お きま す . 


QA>MULISP MUSTAR J) muLISP ガ ら muSTAR を 起動 . 


muL IGP-BO 2。15 (0O3/O1 / 昌 2) 

Standard CP/NMN VersiOn 

Copyriq ロ ht (C) 198B1 The SOFT MAREHUUSE 
LiCensed by MICROSUFT 。 Inc。 


この 時 点 で スプ リー ン が クリ ア さ れ , 次 の コマ ンド メニ ユー ガ 出 力 さ れる 、 


けり だ ド 『 1 0 


ノラ 


各種 高級 言語 に よる 同一 主題 ソフ ト 開 発 倒 


Figure-5.9.4 久 彦 り サー シッ 天 ま す あ / ず バッ が の muSTAR を 起動 し た と ころ . 


muLISP の , その 他 の 多く の 機能 の 紹介 は 省略 し ます . 


5.10 ALGOL 


5.10.1 ALGOL に つい て 


ALGOL (ALGOrithmic Language) は , 1958 年 に 発表 きれ た 科学 技術 計算 用 の プロ グラ フミ ング 言 
語 , IAL (International Algebraic Language) を 基 に し て , 内 容 の 改訂 と 機能 の 拡張 を 行い 1960 
年 に アル ゴリ ズム 記述 言語 ALGOL 60 と し て 登場 し まし た . これ が 現在 の ALGOL の 基 と な っ て い 
ます 。 ' 

今日 の 進歩 し た プロ グラ ミン グ 言 語 か ら み る と , ALGOL は も は や 歴史 上 の も の と な っ て し まい ま 
し た が , プロ グラ ム の 記述 法 や コン パイ ラ の テク ニッ ク な ど , 以後 の 言語 に 与え た 影響 は 大 きく , こ 
も あん て 取り 上 げ ま だ 。 


5.10.2 Mark Moranville ALGOL -M に つい て 


ALGOL-M は 。 ALGOL-60 を 基 に , マイ クロ コン ピュ ー タ 上 で の プロ グラ ミン グ に 適する よう に 作 
られ た 言語 で す . 基本 構成 は ALGOL-60 と ほとん ど 同 じ で あり , ALGOL-60 で 作ら れ た 従来 の プロ グ 
ラム は 。, 若干 の 書き 換え で ALGOL-M 上 で 実行 する こと が 可能 で す . 

ALGOL-M は 。 コン パイ ラン イン ター プリ タ で あり , ALGOL-M の ソー ス ・ プ ログ ラム を 中 間 コ 
ー ド に コン パイ ル し , それ を 実行 時 に イン ター プリ タ で 実行 し ます . 実行 時 に は , デバ ッ グ の た め の 

トレース” の 機能 も あり ます . 


ウタ ノン! 


ALGOL 


ALGOL-M で 使用 で きる 変数 は , 一 16383ー 十 16383 の integer, 18 デ ジッ ト 以下 の decimal。 255 文 
子 以 下 の string の 3 つの タイ プ で あり , デフ ォ ー ル ト は decimal が 10 デ ジッ ト , string が 10 文 字 と 
な っ て いま す . 

配列 は 255dimension まで で 。 お の お の は 0 一 16383 の 値 を 持つ こと が で きま す . 


9.10.3 ALGOL -M に よる 「SAMPLE」 プ ログ ラム の 作成 


ます , ALGOL-M に よる SAMPLE′ プロ グラ ム の ソー ス ・ フ ァイル を 示し ます : 


21VPE RIE 6 し 8 うつ る の エフ ステ ンション は が ALGO* で ある ここ 
begin ALGOL の プロ グラ ム は begin/ で 始ま り の `end/ で 終わ る . 


COmment ALGOUL- ド 1 sample program for "App1ication CP/M" ョ 
コメ ント は , “begin" の あと , まだ は "の あと の *comment-:/ の 間 に 自 由 に 書く (少々 めん どう ). 


1nteG ロ er num。numb。temDps COmmGnt * variable declaration 』s 

9 に 4 もの (で ま キ ス よ うす 。。。。n = x")』 COmmGnt ※ DF1int tit16 』 

write ("は nDuUt n ( n ロ =1。。。18O )")』 COmmG ロ nt ※ Dr1n 1 ロロ ut meー5 和 ま A ロ G 5 
ed(num) COmmG ロ nt * inDut n s 


COmmー ロ nt #* ran Check is 
wh11 num > 1BO do 
beqgin "ーーー ALGOL-M の 整数 は - 16383ー+ 16383 の 範囲 し 扱え な い , 
wF1t@ ("1nput n ロ ( ロ =1。。。18O )") 』 よ つて 250 で は オー バ す る の で 180 に 変更 し て ある , 
己 8d(num)s 
end 


numbs = nums 
t 与 mDi = nums 


COmmG ロ nt \ COmDut@ is 
while num >= 1 do 
beq1n 
nums テ num 一 1』 
temDi= temDp + nums 
( コ aie 


に よ も 馬 まま 、 )8 に 〇 mmm ロモ ※ D ロ ヒュ 1 ロモ 上 FeG5u1t is 


に よ も 全 (で すす ズ も うす 。。。。 "DUUND 。" = で も の 0D ) 6 
wrt (| !) ョ 』 


end ご の end 以 後 は 何 を 書い て も よい . 覚え 書き な ど が よく 書か れる . 


Figure-5.10.1 ALGOL-M に よる “SAMPLE” プロ グラ ム の ソー ス ・ フ ァイル . 


傘 に ALGOL-M の パッ ケー ジ の 中 か ら , SAMPLE′ プロ グラ ム の 開発 に 必要 な 最低 限 の ファ イ 
ル を 示し て お きま す . 


フフ 5 


A:BISTAT *.*/ 「 N 


RecCs Bytes Ext acc 


106 14k 1 R/M AsALGODLM。COM 和貴 間 言 語 へ の コン バイ ラ . 
1 12 14k 1 R/M niRUNALGB.CDM 。 ラン タイ ハ へ - イ ンタ ー プ リマ 、 
ら 1 k 1 R/M AsSAMPLE.ALG SAMPLE" プ ログ ラム の ソー ス ・ フ ァイル . 
Bytes Remaining Un Qi 212k 
AA> 
SNS 


Figure-5.10.2 ALGOL-M に よる SAMPLE" プロ グラ ム の 開発 に 必要 な 最低 限 の 各 フ ァイル . 


ALGOL-M は イン ター プリ タ で す . ソー ス ・ プ ログ ラム を “ALGOLM . COM”" に よっ て 中 間 叶 語 
に ロン ソバ パイル し 。 それ を イン ター プリ サタ の “RUNALG 、COM に よっ て 素行 し ます , 
で は , 中 間 言 語 へ の コン パイ ラ の 実行 例 を 示し ます . 


A>DIR SANPLE。* / 最初 の 'SAMPLE" フ ァイル の 催 語 . 


ni SAMNPLE 人 に は ソー ス ・ フ ァイル の み 存 在 . 


A>ALGOLM SAMPLE / コン バイ ラ の 実行 
ALGOL-M COMPILER VERS 1.1 
O ERROR(S) DETECTED 
コン パイル 成功 . エラ ー な し . 
A>DIR SAMPLE.*) 生成 され だ ファ イル の 確認. 


Az SAMPLE ALG 』 SAMPLE AIN 


ソー スズ ファ ャ イル 生成 され だ 中 間 言 語 
A> の ファ イル 


人 
Figure-5.10.3 ALGOL-M に よる 中 間 言 語 へ の コン パイ ル 例 . 


コン パイ ル は 成功 し て , 中 間 言 語 の ファ イル “SAMPLE . AIN" が 生成 され て いま す . 

これ が ALGOL-M で は , 最終 的 な ファ イル と な り ま す . 

で は “SAMPLE′” プロ グラ ム を 実行 し て み ま し ょ う . 

ALGOL-M は 整数 の 範囲 が ー16383 一 十 16383 し か 扱え な い の で , 入力 は 180 以 上 は エラ ー と な る よ 
う に 変更 し て あり ます . 


>RUNALG SANPLE ) 中 間 言 語 の イン ター プリ ダ に よる ^SAMPLE" プ ログ ラム の 実行 . | 


| QALBHL-M INTERPRETER-VERS 1.0 | 


ウタ 4<) 


ALGOL 


1 NN オー に - 二 あか 米 本 ーー 4 内 9 の 02. 」 4 オム AOOO/ の 生生 HH | Af 訪 ナ ト | \ の が 
rIVEC| よ 。 は SNS 16363: こ 十 10303O) pH 寺 トン ノリ ナス. / し うり (けし 、 
っ 


V 6 十 取 筆 要 再生 ガ 行 \ れ #AI GO 4 が + < カズ 
| ーー 3 ペン ーーー の ^ 。 、 
| npPu モ n ロ ( n=1。。。18O ) 180 以 上 の 入力 仁 エ ラー | 
|  -> 10O リ / 今回 は 正しい 位 を 入力 . | 
| ペ / り ー る 0 2 Ro | 
1 / 
、 An2 


Figure-9.10.4 ALGOL-M に より 作成 され た “SAMPLE”" プロ グラ ム の 実行. 


参考 まで に , リサ リストア ウト 二 ト レース ・ モ ー ド の オプ ショ ン ・ ス イッ ナ を 付け て 。 コン ッ \ イ ラ を 実 
行 し た 場合 の コン ソー ル 出 力 を 次 に 示し て お きま す . 


/ As>aLBOLM SAHPLE *AE/ N 


ALGBOUL-ーM COMFPILER VERS 1.1 | 
り beqgin | 


COmment ALGUL MM sample proqgram for "APDD11CatioOn ビビ /" 


integer num。numb 。temps COmment * variable declaratiori is 

に よ も 人 n (も ャ フィ ォ さ す 。。。。n mw x“) ょ COmmGnt * DCLint 人 tt | 
write ("input n ロ ( n ロ =1。。。1 ピ 8O )")』 COmment % print input message | 
と ead(num) COmment * 1input n 


COmmGnt *% FanqeG Check is 
while num > 18O do 
beqdin 
writ@ ("input n ロ ( ロ =1.。。18O 本 
と @ み (num) ョ 
ndi 


numbs= nums 
tempi = nums 


NN ビデ ビビ ロビ ビビ ビビ ロビ ビー 
〇 ON ひ OO お い と OOQOOmOJ ひ OO ちら いい ビ 


DD ビ ビビ ビビ ビビ ビビ ロ ロロ どー ビビ ビビ ビビ ニー ロー ビビ ビビ 


ソン ロッ パレ ハル 
さ 
は ERRoR sy DETECTED 


/ 
【 1 も 


べき AA> 8 の いな ア 
ぐ べ 、 RS SNS 


21 | 
夫 に 本 COmment * Compute 』 
2 さく while num >= 1 do 
24 beqin 
| 2 き nums 王 nu 一 1』 
| 26 どっ temps= temD + nums | 
"を 1 @ き ロロ 
28 1 
29 1 wF1t (7!")』 COmmEGn も t ま DFint result 』 
さ O 1 write ("1 キ フ + ォ さて 。。。。"。numb。" = "上 emp)s 
さ 1 1 write ("7")』 
さ 2 1 
ささ 1 end 
さ 4 O 
O 
Q 


8 


Figure-9.10.5 スイッチ “$AE” (リス ト ア ウト 二 ト レー ス ) を 付け て の コン パイ ラ の 実行. 


ALGOL-M の , その 他 の 多く の 機能 の 紹介 は 省略 し ます . 
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吾 種 高級 言語 に よる 同一 主題 ソフ ト 開 発 倒 


9.11 APL 


5.11.1 APL に つい て 


APL (A Programming Language) は , 1956 年 か ら 開 発 が 始ま り , 1960 年 に 対話 形式 の プロ グラ 

ミン グ 言 語 と し て 実用 化 き れ ま し た . 当初 は IBM の 内 部 で 使用 きれ て お り , 一 般 に は , 1968 年 に IBM 
ステ ム /360 の TSS で 使用 され 始め まし た . 

APL は 基本 的 に は , 0 (スカ ラ ) 次 元 以 上 任意 の 配列 デー タ を 対象 に 演算 を 行う も の で , すべ て の 
操作 は 。 関数 の 集まり で 表現 され , その 文法 は 極め て 単純 で あり , IF と か DO, 各種 宣言 文 な ど は 一 
切 あ り ま せん . 

二 項 まで の 引数 を 持つ 関数 と , その 関数 の 引数 と な る スカ ラー, も し く は 1 次 元 以上 の 任意 の 配列 
の み で 構成 され , その 処理 系 は イン ター プリ タ の 形式 を と っ て いま す . よっ て , BASIC 言語 の よ es 
コン ピュ ー タ ん と 会 話し な が ら プ ログ ラミ ング を 行う こと が で き , APL の 知識 の な い 人 で も , 直接 キー 
ボー ド に 向い マニ ュ ア ル に 従っ て キー イン し て 行け ば , 即 そ の 答え が 返っ て くる の で , 効果 的 に 学 
泊 す る こと が で きま す 

APL は , デー タ 解 析 や 数 値 解析 の 分 野 . ベク トル や 配列 演算 を 多く 行わ な けれ ば な ら な い グ ラフ フィ 

ックス の 分 野 な ど に , 強力 な 言語 と し て 利用 され て いま す . ' 

APL は , 特種 な 文字 や 記号 を 持つ キー ボー ド を 使い ます の で , その モデ ル (BM 2741 キー 
ドナ を 沢 に 示し て お きま す . 


上 “ 
/ 


Figure-5.11.1 APL の 正式 な キー ボー ド 


を ダ 4 ニ 


AFPL 


9.11.2 SOFTRONICS 社 APLN8O に つい て 


SOFTRONICS の APL イン ター プリ タ は , フル APL の ほとん どの 機能 を 持っ て お り ,。CP ン M の 
ディ スネ クル 0 の た め の シ ステ ム ・ フ ァ ン グ ジ ション と 変数 ′※ シス テム “コマ ンド 万 ど を 備え 分 引 ます . 

CP/M で APL を 使う と 言っ て も , あの 特殊 文字 は どう する の か と 疑問 を 持た れる と 思い ます が , 
SOFTRONICS APL は 、 ター ミナ ル の 種類 に よっ て , “ASCII モー ド ” と “APL ター ミナ ル ・ モ ー 
ド ”" が あり , APL の 特殊 文字 を 持た な ぃ い 普通 の CPM マシ ン で は , “ASCII モー ド / で 実行 する 
4 

ASCE そ モード" と 青 う の は 。 . 例 えば 


ディ メン ショ ン の の …$RO 
逆行 列 の に …$XD 
ワー デー の 〆 …$RT 


と 言っ た 具合 に , 特殊 文字 を $ に 続く アス キー 標準 文字 の 2 字 で 代用 し ます . 入出 力 と も , これ に よ 
り 表現 し ます . 

"APL ター ミナ ル ・ モ ー ド ” と 言う の は , IBM の 2741, 2740, 3767 な どの APL 用 の ター ミナ ル を 
接続 で きる 場合 の モー ド で あり , 正式 の APL 文字 に よる 操作 が 行え を ます . CPM マシ ン で は , キ 
ー ボ ー ド に 特殊 文字 を 書い た ステ ッ カ を 貼り 。 スク リー ン の 表示 に キャ ラク タ を ユー ザー が 任意 に 作 
り 出す こと が で きる VRAM な ど を 使え ば この モー ド で の 操作 が 可能 で す . APL の お も し ろ さ が 分 
か っ て くる と , 基 非 そう し た く な る で し ょ う ) (米国 で は , この APL 記 号 を 表示 で き る S-100 バ ス の V-RAM 


ボー ド が 市 販 さ れ て いる ). 


5.11.3 APLN8SO に よる 「SAMPLE」 プ ログ ラム の 作成 
この APL ヽ N80 の お も し ろ さ に は , 筆者 も いさ さか 興味 を 持ち まし た の で , 本 項 は 少々 雰囲気 を 変え 
て 解説 し た いと 思い ます . 
"APLN80" の パッ クス ラッ シュ は 。 IBM の APL が “APL ヽ N360" と いう よう に 甘 竹 計ら れ て い 
る の で , それ に 従っ た も の と 思わ れ ま す . 
実は , 難 者 は 実際 に APL を 自分 の 手 で いろ いろ 動か し て みる の は , この APL ヽ 80 が 最初 で す .CP/ 
M 上 で 走る APL が ある と いう こと は 以前 か ら 知っ て いま し た が , 実際 に 自分 の S-100BUS マシ ン 
や , PC-8801 の CPM で 走ら せ て みる と , この APL と いう 言語 は , 実に 興奮 きせ る も の が あり ます. 
イン ター ブリ タ 形 式 な の で , 普通 の パー ソナ ル ・ コ ンピュータ の ROM に 組み 込ま れ て ぃ いる BASIC 
イン ター ブリ タ と 同様 に 。 コン ピュ ー タ と 会 話し な が ら 非 常に 気軽 に いろ いろ と 試み る こと が で き , 
楽し く 学 ぶ こ と が で きま す 、 


フフ 


A: 愉 PH APL を 起動 し 」 ユー ザー の キー 入力 部 分 . キ ヤリ ツジ ・ リ タン を 伴う . 


SOFTRUNICS APL\ 日 O 
VERSIUN 2. さ マヒ 


| CUPYRIGHT 1979 BY ERI ド K MUELLER 
CLEAR MM 人 ら ノー キン グ ・ ス ペー ス は 空 と いう メッ セー ジ が ガ 出 て , コマ ンド の 入力 待ち と な る . 


居 *20] 5+20 
っ EE ここ で 使用 する 代用 記号 の , 正夫 
還 zo…5*20 の APL 記 号 を 炊 に 示し ます . 
。25 
15 
TI &J| lxJ 
1oO 
ま RO 1 な き の ひ / 生 ラー 変数 A に 配 多 123…9 を 3x3 の 行列 に 変換 し て 定義 する . 
還 で 
: | 
4 行列 ガタ イプ アウ ト さ れる . 
フ | 
ー- 同 じ く 変数 B に 行列 を 定義 . 
1O 
4o 
7o 
[ 他 =A] 行列 の 差 を タイ プア ウト . 
| サリ (7 
ュ 3。 45 54 
22 72 861 
つこ 行列 人 を 暫 置 し だ も の を 次数 AT と し て 定義 . 
ey の イプ アウ ト . 
IA 
う 5 8 行列 A の 転 置 行列 . 
3 w 
る ] 1 | 
(に) ら 4 行 別 A の 反 転 行列 . 
9 。 | 


2.71 ヨ 2B 7.3B905 20.0855 
ら 4.5981 14 コ .41 る 40 る 。 428B 
1096.6 さ 298BO.95 81O さ 。O6 


ALDB_$B 人 | 行列 の 自然 計数 を と つて , 変 数 ALOG と し て 定義 
あの メイ フ ア フ ト 。 
9) - 69 る 1 47 1 。O78B61 
1 .3B629 1.60944 1。79176 


還 全 ] 行列 A を 指数 で ツタ イプ アウ ト (@^. 


な APL の 雰囲気 を 知っ て 頂く た め キー ボー ド に 向っ て APL を 起動 し . ちょ っ と 何 か を 実 


AFL 


1 .94591 2。O7944 2。19722 
[) VaRS] 現在 定義 され て いる 変数 の すべ て を タイ ィ プ アウ ト . 


#1 J 98 B ATP AREV ALOG 
DOFF] CPM に 戻る . 


0 IS シン 


Figure-5.11.2 APL の 操作 は 大 変 簡単 で す . 


この よう に 実に シン プル な 看 語 で す 。 

さて "SAMPLE" プロ グラ ム を , この APL ヽ 80 で 作成 する 訳 で す が 。 そ の ソー ス : プ ログ ラム の 
作成 は , 本 章 で 取り 上 げた 他 の 言語 の よ うに, 任意 の エディ タ を 使っ て , 言語 レス テム と は 独立 し て 
別に 作成 する こと が で きま せん . ソー ス ・ プ ログ ラム は 。 APL シス テム に 入っ て , その 中 で の み 作 成 
され ます . 

イン ター ブリ タ な の で , 作成 中 の プロ グラ ム の 一 部 分 を 実行 し て , デバ ッ グ を 行う こと も 可能 で す . 
実行 中 に バグ が あれ ば , エラ ー の ある ライ ン の 内 容 を 表示 し て , 実行 を スト ッ プ し ます . 

で は , 「 APL ヽ 80 の 起動 “SAMPLE” プロ グラ ム の 入力 一 実行 っ デバ ッ ク 実 行 一 完成 し た プロ グ 
ラム の ディ スク へ の セー ブ 」 の 手順 を 次 に 示し ます . 


oooyryxoxooo SSC2 の fo oo ccc excn の ooozmoowroooooroazoxuoopocoocc oooxoowecxorovooco 


0 SS - ーー _ 
/ AaPL] - APL.COM を 起動 . [部 は ユー ザー の キー イン 部 を 示し , キャ リッ ジリ マン を 伴う . “ い 


SOFTRDNICS APL\BO 
2 本 来 は バッ フス ラッ シュ へ "で ある . 日 本 の プリ ンタ で は 実に サマ に な ら な い <80 円 の APL?). 
COPYRIGHT 1979 BY ERIK MUELLER 

iAPL で は , シス テム の 遍 答 は この 位置 か ら 表 示さ れる . 

CLEAR IMB ワー フ ・ ス ペー ス に は 何 も な いこ と を 示す . | 
) FN] -- 現時 吉 で 定義 され て いる 関数 を すべ て タイ プア ウト せよ . 結果 は 空白 の 応答 で 何 も 定 義 さ れ て いな い . | 
inone 1=APL で は , コ ユーザー の キー イン する も の は この 位置 か ら 表 示さ れる . | 


| 0 SAMPLE』 Ni NUMB』 TEMP] - SAMPLE? プ ログ プラ /. を 関数 SAMPLE と し て 定義 モー ド に 入る . | 
L1」S ーー 選 和 は その 引数 は な い 、 | 


2] PF 1 す 2 で る *。。。。n = 中 タイ ト - ル の 出力 | 
LE さ ] ら ゴ >1 1 > 入力 メッ セー ジ の 出力 と ラベ ル *READ* の 宣言 . 
E4] | 数 字 を 入力 し て N_NUMB, TEMP に 代入 . 値 が 250 よ り 大 の 
5] ヒ ー NUMBー-NUMB-1, TEMP<- TEMP+ NUMB. 時 は READ へ 帰る . | 
C6] フ 5 / COMPUTEI NUMB デ 0 な ら COMPUTE へ 、 | 
E フ コグ IE 

ELB1 ラ | 傘 6 入力 値 と 答え の 出力 . 


t93 ム ビー あみ 行 

E1O] (を DLI 定義 モー ド を 終了 せよ . | 
DFN 記 前 出 | 

SANFLE | 

[SAMPLE| 関数 SAMPLE(5| 数 は な い ) の 実行 . つま りら YSAMPLE? プ ログ プラ ハム の 実行 . 


4 すこ キ う を 。。。。 円 mx 

も ま DU D (n w 1。、。。25O ) KW 

RGQ] 254 以上 の 入力 値 エ ラー. AFL で は 入力 時 は 秒 ざ ず 改 行 が 行わ れる . 
1n ロ Dut ロロ (n = 1。。。250) ペペ 


ンコ 1 


吾 栖 高級 言語 に よる 同一 主題 ソフ ト 開 発 例 


ーー 入力 値 エ ラー. 


を PD いも Fn ( ロ = 1、。。Z90) oowdke < 
_ 正しい 値 を 入力 . 
SYNTAX ERROR プロ グラ ム に バグ あり の / トー ミス タイ プン "で は な ぐ "が ガ 正 朋 . 


BArIPLE[B]〕) $QD "1+ つ て うす 。。。。" 。($FN N) 。/=*" 。($FN TEHP)- エラ ー の ある ライ ン ガ が 表示 され る . 
まほ DL SaMPLE」 編集 モー ド に 入れ . 
[10] | [ 晶 $GD]] ライン [8] を 表示 し て , 再 入力 モー ド に 入れ . だ だ し 1 行 全部 を ツイ プ し 画す 秒 愛 あり . 


[8] | ま DD "1+2+ ス +。。。。” 。( ま FM N) 。/= ニ " 。( ま FM TEMP ) 
rg | て WFM N)* = テッ ( ーー めん どう で も 1 行 全 邦 を ウイ ブレ 直す . 
E9] プ | 際 DL] 編集 モー ド を 終わ れ , 


半 人 RM し LE」 も つう 一度 実行 . 


3n ロ Du も ロロ (n = 1。。。2Z5O) ein 
izSOj ---250 を 入力 . 


トン ブー ンー 


ら SAMPLE| もう] 度 実 行 . 


ます すす さす 。。。。D の た 
3 われ DU も ロロ (nh = 1。、。。25 ひ O) ーーー ナ 


1+2+ さ +。 。 。 。10O = SOSO 正しい / 


] 
| 
1+ キ 2+ す さす 。。。。 ロ デー ※ 


) SAVE SAMPLE] SAMPLE" プ ログ ラム を ディ スク に セー プ す る . 正 し ぐ 表現 する と , 現在 の WS( フ ー キ ング ・ ス 


SAMPLE SAVED ベ ペース) の 全部 を セー プ す る . これ は 関数 SAMPLE の み を セー ブ プ す る の で は な ぐ , こ の 時 点 で 定義 
[DDPPF]-CP M に 戻る . 済み の すべ て の 関数 や 変数 (この 同 で は YSAMPLE“ の み し ガ 存在 し な い ガ ) を セー プ す る も の で あ 
( り , 後 で これ を ロー ド す る と , セー プ し だ 時 点 と 同じ 状態 を 再現 で きる . 


Figure-5.11.3 APLN80 に よる “SAMPLE” プログ ラム の 作成 の 全 過 程 . 


以上 の 手順 で YSAMPLE” プロ グラ ム は で き 上 り , 実際 に 使用 テス ト も 行い まし た . ディ スタ 上 に 
は ,。 その プロ グラ ム ・ フ ァイル ( 了 え キー・ フ ァイル で は な てく , 牛 間 コー ド ) "SAMP ま も 失 AP も が 
生成 きれ て いま す (ここ て で 使用 し た APL 記号 の 代用 表示 に つい て は 後述 ). 

現在 の ディ スク 上 に は , APL ヽ N80 の パッケ ー ジ の 中 か ら , 必要 な ファ イル だ け と , で き 上 っ た SAMPLE" 
プロ グラ ム が セー プ さ れ て いま す の で , それ ら を STAT コマ ンド 宅 あ イイ ヂ サ 相 も 生ま し ょ 2, 


QA>BiGTAT #*。*/ 


RecC5= Bytes Ext 人 CC 


284 さる 6k さる R/M AAPL.COUN AF し イン ター ブリ 
2 さる さ k 1 R/M AsETCFNS. APL - 名 種 関数 の ライ ブラ リ . SAMPLE" プ ログ ラム に は 和 め 要 な し . 
ら 6 1 ド 1 R/M AsSAMPLE 。 APL で き 上 っ だ *\SAMPLE? ッ プロ グラ ム 、. 


Bytes Remaining On As 201k 


し 3 


谷 > 


Figure-5.11.4 ディ スク 上 に 現在 セー ブ プ さ れ て いる ファ イル . 


どの 4 ニア 4 


AFPL 


で は この 人 後 , も う 一 度 最初 か ら ,。 ディ スク に セー ブ さ れ て いる “SAMPLE” プロ グラ ム を ロー ド し 
て 実行 し て み ま す . その 後 , 各種 関数 の ライ ブラ リ ・ フ ァイル を ロー ド し て , 2- 3 の 関数 で 遊ん で 
た 誠に も 芝 。 


「 | 部 は ユー ザー の キー イン 部 を 示し , キヤ リッジ ・ リ マン を 伴 つ . 
AAPL] AP し を 起動 、 APL で 遊ん で みよ う . 
SOFTRONICS QPL\BO | 
VERSIUN 2. さ ビ 

COFYR1TGHT 1979 BY ERIK MUELLER 


CLEAR MS 

LiB すべ て の APL フ ァイル を マタイ プア ウト せよ . 
ETCFNSB いつ いる な 関数 の ユー ティ リティ ・ ラ イブ ラリ 
SAMPLE 先程 セー プレ し だ “SAMPLE" プ ログ ラム . 


ーー SAMPLE.APL* を ロー ド ビ 、 
SAMPLE LOADED 
在 ロ ー ド され ね て いる すべ て の 関数 を タイ プア ウト せよ . 
SAMPLE これ の み . 
AHPLE] SAMPLE の 実行 
キナ きま 。、。。 、 失 、 生 X 
1n ロ Dut ロロ (n = 1。。.25O ) 2 
We】| 


1+2+ さ +。。 1OO = 5050 正しい / 


ーー 各種 関数 の ライ ブラ リ ・ フ ァイル を ロー ド せ よ ヾ SAMPLE? は 失わ れる . 


ETCFNS LOADED 
DFNS] 前 出 . 
PR SORT PASCAL ENTER OF RESET IN TRUTH GCD DET R | これだけ の 関数 が 現在 定義 ご され て いる . 
EAD SEQ HISTD SUB LS MRI 「 
AA 名 要 系 の 値 が 10 で 長 さ が 40 の ベ フ トル を 作 つ て . それ を X と せよ . 
10 10 PD SC 1O 1O 1Q 1Q 10 1O 10 1o io | 
ゲ oy 
10 10 10 10 10 10 10 10 10 10 10 1O 10 10 10 10 10 10 1 フト され だ 
10 10 


- そ の ベト ル X を 乱数 化 せ よ て 最大 値 は 10). 
届き れ だ ペク トル X を タイ プア ウ ト せ よ 、 
ら 6 < 10 286115849667285122511928H58 コ 8 コ 22888 コ 81O969 


じ +”_ HISTO 旬 ご の ベク トル X の ヒス ト グ ラ ム を 作 つ て 表示 せよ . 表示 に は *+* を 使え . 


+ + 
て + て ++ 
+ + す ネ キ すす 。 圭二 す すす + 
キ + + + 。 + + + す 二 二 士 。 キ 二 キキ キキ 
+ す 二 ++ す キキ ++ キ + 二 士 。 キキ 二 キ キ す 二 
すす すす すす キオ キネ + て ナナ +*++ - + ャ *++ っ > 大 人 10 
す 二 + 士 。 キキ キキ すす 十 二 す 。。 二 二 和 キ 士 キキ 。 キキ 二 二 二 二 キ 
+ 十 二 士 。 二 二 二 二 キ 二 二 + す 。。  + 二 キ キ 十 。 二 す 二 キ すす て 


+ キ キオ キキ 。 キキ 二 二 キ 二 す 二 十 二 二 二 す 。 キ キ キキ キキ キキ キキ キ す キキ 二 
ーー 
0 Ai 


較 SSRT | - ベ フト ル X を ソー ト せ よ . 
ー- そ れ を タイ プア ウト せよ . 


14..11) ミ スッ 2 ス 2 スト テス 4839883544 ム 464 4 フ 2 BB ヨ BB8dB888a88a8a95999 1o10 
人 ト さ れ だ ベク トル メ の ヒス ト グ ラ ム を 表示 せ せよ ,“+ "を 使え . 


キキ 

すす キキ 

キキ キキ キキ すす キ 十 

すす すす キキ すす キキ + す て て 二 すす すす て 

+ す す キ キキ すす キキ 二 二 すす 二 キ すす て 

キキ キキ キキ すす キキ 二 すす キ すす すす て すす て 二 

キ そ て す キ キキ すす キ キキ すす すす 二 二 す 二 二 二 二 す + す + 

bu gb みみ 江 エ ホス エエ エメ たよ エエ エズ ペデ デミ <: 

キキ す キ キキ キキ キキ 二 す 二 す キ すす て す キキ すす て て すす て + す て 

・ す キキ すす キキ キキ キキ キキ キキ 二 二 すす すす キ キ すす 


ン ご 3 


導 種 高級 言語 に よる 同一 主題 ソフ ト 開 発 例 


が ーー ビー ビー ビー ビビ ロビ デビ ビビ ビビ ビビ デビ ビデ ビデ ビビ 


も まう 
に 2 } 
[ さ ] 


ビ ヒストグラム (HISTO) の プロ プラ ム を ダイ プア ウト せよ . 
ま DL  Z SYM HISTO 
に 


Z (" ” 。SYM) [ 1+( 多 RT ま 10 ま MX /V ツ )$NL 。$LE ソ ] だ つ だ 1 行 で 上 記 の 機能 が 書け る . APL は スゴ イ / 
DL 
[*DL SORT 上 $QD] $DL| 
を DL ORD_SORT UNS』MHICH 
DRD %10 O | 
LB』 $GD O&$10 O=$RO UNS 
MHICH_UNS=$MN /UNS | 
DRD_DRD。MHICH/UNS : SORT の プロ グラ ム 、. 
UNS_($TL MHICH) /UN5 | 
$GD LB 
DL 


PSR 49」 大き さ が 20 の パス カル の 三角 形 を タイ プア ウト せよ . 


ソー ト (SORT) の 内 容 を ツイ プア ウト せよ . 


1O0 1O5 1 

15 20 15 6 1 
まう 8 3 は} / 1】 
28 56 70 56 28 コロ 1 
さ 6 B4 126 126 84 さ 6 9 1 

45 120 210 252 210 120 45 10 1 

ら 55 165 ささ 3O 462 462 ささ O 165 55 11 1 

66 220 495 792 924 792 495 220 66 12 1 

7 286 715 1287 1716 1716 1287 715 286 78 1 さる 1 

91 364 1001 2002 3 さ QO さ 3432 3QO3S 2002 1OO1 さ 64 91 14 1 

105 455 1 さ 65 さく OO さ SOO5 6435 6435 SQOOS 3O0S 1 さ 365 4S5 105 15 1 

120 き 560 182O 4368 BOOB 1144O 1287O 1144O BOOB 4368 18B2O 56O 120 16 1 
1 さく 6 68O 2 さ ヨ O 6188 12 さ 76 1944 ロ 24 さ 10 2431O 19448B 12 さ 76 618B 238OQ 68O 136 17 1 


15 さ 16 さ 3O6O BS68B 1 ヨ 8564 さ 1824 4375B 48B62O0 4 さ 75B さ 1824 1B5S64 8B568 3 さ O06Q B16 153 18 1 
171 969 3876 11628 271 さ 2 SO さ BB 75SSB2 92 く 78 92 さ 78 75SSB2 5OSBB 271 さ 2 11628 さ B76 969 171 19 1 


- そ の プロ グラ ム を ダイ プア ウト せよ. 
DL PASCAL NjP 
は 
PRINT iP | パス カル (PASCAL) の プロ グラ ム . だ つた だこ 4 だ け ソ / 
*$GOD PRINT&N*GE ま RD P_(Q。P)+P。O 
DL 


[DD OFF] 遊び ば はやめ て CP /M に 戻れ . 


A> ( 注 ・CRT や , プリ ンタ へ の 出力 は , 1 行 の 字数 が 多い と , 次 の 行 に 続い て 表示 され ます . ) 


Figure-5.11.3 や Figure-5.11.5 で 使わ れ た APL 


Figure-5.11.5 APLN80 で ちょ っ と 遊び を . 


た 0 ます 。 


ン ご 4 


Figure-5.11.6 “SAMPLE" プ ログ ラム の 作成 に 使わ れ た APL 記 号 の 代用 ASCII 表 記 


記号 の 代用 ASCII 表示 は , 実際 は 次 の 記号 に 


当 


6 暮 CP/7 の アプ リケーション いろ ぃ い ク 


科 易 言語 (プロ ブラ ムレ ス 言 語 ) の 使用 倒 


6.1 簡易 言語 (プロ グラ ムレ ス 言 語 ) の 使用 例 


VISICALC (Visi Corp 社 ) に 端 を 発し た , “簡易 言語 " と 呼ば れ て いる 汎用 ビジ ネス ・ ソ フト ウェ 
ア は , その 質 ・ 内 容 ・ 種 類 と も 大 き な 進 展 を 見 せ て お り , 現時 点 で は , “Multiplan” (マイ クロ ソフ ト 
社 ),。 “SuperCalc” (ソー シム 社 ) な ど が , 質 ・ 内 容 と も に 代表 的 な も の に な っ て いま す . 

芋 者 は , 米国 製 の , この 2 種類 の ソフ ト を 実際 に 使っ て みて , 日 米 間 の ソフ トウ ェ ア ・ ギ キ ギャップ 
正 に ここ に あり ! と いう 強い 印象 を 受け , この こと を 「 実 習 CPZM」 の 冒頭 に も 書き まし た . 

日 本 で も , この 種 の ソフ ト は 雨後 の 竹の子 の よう に た くさ ん の 種類 が 発売 され , 中 に は , 大 々 的 に 
定 伝 さき れ て いる も の も あり ます . し か し , その ほとん ど は , 特定 の パー ソナ ル ・ コ ンピュータ 専用 の 
も の で , プログ ラム も , その 機種 に 組み 込ま れ て いる BASIC の イン ター プリ タ で 。 た だ ズラ ズラ と 
書か れ て いる も の ば か り で スピ ー ド も 遅く (マシ ン 語 を プロ グラ ム の 一 部 に 使っ て いる も の も ある が ), 
内 容 , 使い 易 さ な ど , 先 の 2 つの 米国 製 ソ フト に 比べ あま り に も 幼い 。 と いう の が 実感 で す . 

CPM 上 て 走る 優秀 な ソフ ト が ある こと を 知ら ず , これ ら の 貧弱 な ソフ ト が , パパ ソコ ン の 能力 の 限 
界 で ある な ど と 誤解 する 人 も いる の で は な いか と 心配 で す . 


それ で は , この 種 の ソフ ト の 中 で , 米国 で ベス ト セ ラー の 1 つと 言わ れ て いる , ソー シム 社 の SuperCalc 
を 取り 上 げ て , その 合用 例 を 紹介 し まし ょ う . し か し , その すべ て を 紹介 する 訳 に は 行き ませ ん . 例 
に よっ て , すべ て を 紹介 する に は , SuperCalc 用 の 本 を 一 冊 書 か な く て は な ら な いで し ょ う . よっ て , 
ここ で 例題 と し た も の は , 機能 の 一 部 , 使い 方 の 一 例 で ある に 過ぎ ませ ん . 


6.1.1 SuperCalc の 概念 


VISICALC, Multiplan, SuperCalc な どの 汎用 ビジ ネス ・ ソ フト の 概念 は 、。 どれ も ほぼ 同じ で あり , 
"ソー クシ ー ト “と 呼ば れる “電子 の 紙 ?( コ ンピュータ の メモ リ の デー タ ・ エ リア に 当たる ) を SuperCalc 
で は , 横 63 メ X 縦 254 の 計 16,002 個 の “セル” に 区 切り ,。 その “セル” に , 項目 や 数 値 な ど を 書き 込み , 
"電子 の 紙 " を “ 表 と し て 用 い , 縦 ・ 横 の 計算 (各種 関数 も 含む ) な ど を 行わ せる も の で す . 1 つ 
の 表 の 中 で の デー タ の プ ブロック 移動 や 、 他 の 場所 へ の コピ ー, 他 の 表 か ら の デー タ の 取り 込み な ども 
自由 に 行え ます . 「 

Figure-6.1.2 の 表 が , その 電子 の 紙 ” の 実際 で あり , SuperCalc を 起動 し た 状態 で は , 表 全 体 の 
左上 に 当る パ デ ィ ス プレ イ ・ ウ ィ ン ド ウ ? が , スク リー ン に 表示 され て いま す . 

表 の 上 の 位置 の 呼び 方 は , 横 方 向 に “カラム (Column) A, B, C……? 縦 方 向 に バロー (Row) 
上 2 の 590 / と 表現 し ます . それ ぞ れ の パ セ ル ” は カラ ム と ロー の 交点 に 当たり , この 図 に 示さ 
れ て いる セル は , “E10′ の セル と いう こと に な り ま す . 


ジオ ニ ザ / 


CPM の アプ リケーション いろ いろ 


この 図 の 。 セ ル "A1" の "< >? 記号 (コン ピュ ー タ に よっ て は 。 この 部 分 の 表示 が 反転 し た り , 
色 が 付い て いた だ たり する) は 。 “アクティブ プ ・ セ ル ” を 示す 設 陸 2 の あり 。 記 玉 デ タダ シキ ゴマ ) 大 だ さ で の 入力 
5 - 閉 き 替え な ど は ,。 この アク チ ィ プ ・ キ キル” を 通し て 行わ れ ま す 。 

6.1.2 SuperCalc の 使用 例 


で は , SuperCalc を 起動 し て , 実際 に 簡単 な 表 を 作っ て み ま し ょ う . NEC の PC-8801 上 で , NEC 
の CPM を 使っ て 実行 し て み ま す . 
SuperCalc の 起動 は , 


A>SCJ 


で 行わ れ ま す . その 。 オー プ ニ ン グ ・ メ ッ セ ー ジ を 次 に 示し ます . 


レン ーーーーーーーーーーーーーーーーーーーーーーーーーー 一 mr ie rm wm ツーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 


A>SC ) SuperCalc を 起動 する . 


GuDG ビ じ a ュ 1 て (人 tm) 
Version 1。.O6 
Term1ina1 :s SoOrOcC 120 
CPU BOBO | 
8S/N- QQQOO 。Sys 2.x 
| 


CopyF1ght 19 昌 1 


SORCINM CORP 。 
Santa。 Clara。 CA。 


Enter “"?⑦" イロ r HELP or "return" to start。 較 


へ NEC の CPM の ファン フシ ョ ン ・ キ ー の ユー、 


人 LCp Lock On EE Qn | SCREEN COPYI[DIR ak |]| TAB || RUBQUT 


SS 開 SuperCalc の 起動 と , SNS が PS グ ・ メ ッ セ ー 


まみ 和 を てく 人 REURNP あ キー モテ し て 。 プロ グラ Aa あ ス タート 上. 革 せ まず, 

プロ グラ ム が スタ ー ト する と , スク リー ン に は , Figure-6.1.2 の 左上 方 に 示さ れ て いる “ディ スプ 
レイ < ウィ ンド ウ ? の 部 分 が 表示 され ます . この 部 分 は , 図 で も 分 か る よう に , ワー クシ ー ト 全体 の , 
ほん の 一 部 分 で あり , ユー ザー は , 大 き な ワ ー ク シー ト の 任意 の 場所 を , この ディ スプ レイ ・ ウ ィ ン 
ドウ を 上 下 左 右 に 移動 する こと に より , 見 る こと が で きる 訳 で す . 


ウオ ニ { こ 


簡易 言語 (プロ プラ ムレ ス 言 語 ) の 使用 例 


ケーーーー | 是 昌 1 日 的 品 上 | 


ー ト 全体 


(うー 


デイ スプ レイ ・ ウ ィ ン ド ウ 
スク リー ン 1 画面 分 の 
表示 エリ ア . 任意 の 位 
置 に 移動 する . 


NEC の CP プ M の ファ ン フ ショ ン ・ キ ー 
go SuperCalc と は 直接 関係 


2 ABKC63 個 ) 

232! 

231 ok て ET 

254 イー 


Figure-6.1.2 SuperCalc の ワー クシ ー ト と ディ スプ レイ ・ ウ ィ ンド ウ 


ど 4 ニ 1 


じ ピ ビア M の アプ リケーション いろ いろ 


次 の 表 は , 簡単 な 作 表 を 行っ て いる 途中 の 状態 を 示し た も の で す . 


(4 1! B ! 1 に 11DIIi E 1 1 


セ 


2 SuperCalc Sample Program for CP/M Learning Bystem 昔 さ 

さ ! 

4 | ハリ * ラメ ー タ 人 (PA) = (HI+MA) /2 だ だ の 足し 算 と 割り 算 . 

に ハ * ラメ ー タ B (PB) = SIN(HI) :x ATAN(MA) サイ フ と アー フツ ンジ ェ ン ト ( 単 位 は ラジ アツ ) 
-6! ハ * ラメ ー タ じ (PC) = EXP(HI/1OO)+LOGe (MA) +SHRODOT (HI+MA) 6 ご 自 舌 対 数 とこ 、 

7 ! コ " ウ ケイ (SUM) = PA+PB+FPC だ だ の 足し 息 . 

日 |! 一 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 1 
911 コウ モツ | シン チョ ウ タダ イシ” ュ ウ | ハラ メー タグ ハ * ラ メー タラ BB リリ“ で ラメ ー タ に コウ ケッ イィ | 
# り | ! ナマ エ ! (HI ) (MA) 1 (PA) (PB ) (PC) (SUN ) ! 
下層 本 圭二 圭二 圭二 す す す すす 1 二 二 す 二 すす すす 1 すす すす 111 11 1 1711 すす 111 1 1 1 11111D1LTIO け 113 1 1 すす! よ す 上 上 肖 

| 412) | 4 も り 7 キ /2 ・ | 176 67。 | て 120。 7 っ 1 。、1 ズ タム 2 2 うき 。4 う 2 ラサ 1 145。 の うう 3! 
13! | カタ キネ ドリ アキ ラ ! 171.4 66. 4 | - | 
14!| 92 ョ ヨシ E ロ | 172.7 65。9 | アフ ティ ブフ: セル ! 
| まき ! コ ラク な ケ 4 コ | 161 。 ム 6 SO 。 は 1 ! 

6!)) に J の 9 カ に 9 エエ | 160。5 4 日 。 日 ! ! 
た / | | / 全 及び ズ スス ルム | }1/5。 ア だ る 。、 さ H 1 
は! | ん ム う 2 や ドス) ルル | 1/ 和 85.2 ア り 、2 | ! 
4 全 | | 一 ーーーーーーーーーーーーーーーーーーーーーーーーー ニ ーーーーーーー ニ ーーーーーーーーーーーーーーーーーー ニ ーーーーーーーーーーーーーーーーーー | 
20! 
人 22 スィ FQOFm=(B12+C12) /2 アフ ティ イプ ブ ・ セ ル の 計算 式 ( フ ォ ー ミ ュ ユラ) が ガ 表 示さ れ ね て いる . 
To? (Enter Range) 。 then er OF の 。" Gr ロロ ptionw 

2 さ >/RepliCate』E12,E1 さ saE18 次 に 実行 し よう と する レプ リ ケ ー ト ・ コ マン ド の ライ ン . セル E12 の 計算 式 を , 


LCE Lock On | | SCREEN COPY | TGB 四 RUBOUT 詳 半生 計 
9 5 リ ケ ー ト レ , そ の 答え 


を 表示 する . 


Figure-6.1.3 作 表 の 途中 の SuperCalc. 


ロー1 一 7 は,。 この 表 の タイ トル と , oe 
ロー 8 一 19。 カラ ム A~1 の 二 囲 が 1 つの 表 に な っ て いま す . 

DS 
So れれ で いま キ 。 か だ し 。 この 起 は ほえ スク リサ リーン キキ プリン シン タ 上 の こと で あり 、 デー タタ と し て は , | を め セ も 

こも 最大 116 文 字 を 入力 する こと が で きま す . 

表 に は , 実在 の 人 物 の 氏名 と で た ら め の 身長 ・ 体 重 の 値 が 記入 され て お り , その 右側 に は , 意味 の 
な い パ ラメ ー タ A, B, C と , その 合計 の 項目 が あり ます .。 各 パ ラメ ー タ が , どの よう な 計算 式 に 
り 求め られ る か は , ロー 4 一 7 に 書か れ て いま す . それ ら の 計算 式 (フォ ー ミ ュ ラ ) は , すでに 「 イ 
セリ アキ ノブ 」 の 行 の み に 書 き 込 まれ て お り , その 計算 結果 が 表示 され て いま す . パ ラメ ー タ A PA) 
の 実際 の フォ ー ミ ュ ラ を , 表 の すぐ 下 に 見 る こと が で きま す . 

FE カギ リ アキ ラ 」 以後 は 。 デー タ の み が 記 入 き され て いる だ け で 。 フォ ー 
ず , その 計算 結果 は 白紙 の まま と な っ て いま す . 

で は ,。 パラ メー タ A の カラ ム を 全部 埋め て み ま し ょ う . 


/ 7// 


ュ ラ は 記入 され て お ら 


ン 紀 0 


間 易 言語 (プロ ブラ ムレ ス 言 語 ) の 使用 例 
前 上 内 の 表 の 下部 に は ,、 その コマ ンド ・ ラ イン が すでに 書か れ て いま す . 
Replicate。 …… 復 写す る . 
EE12。 も 13・E18…… セ ル E12 の フォ ー ミ ュ ラ テラ を や セ ルレ.E13 一 弘 18 に レデ プリ ケー ト す る . 
と いう 意味 の コマ ンド ・ ラ イン で す . 
どう が 末 か に デン 本 キー キ ント で 琴 邊 も で あま も 
1 eee 
! Aa し L 。 生 4 し も 1RIL に 0 | た (1 及 11。 中  」u N 
1 ! | 
2 | SuDGrCa1c Sample Program for CP/M Learning Bystem 幕 さ | 
さ ! ' 
4 1 ハ " ラメ ー ダ タダ (PA) = (HI+MA) /2 
5 1 )” ラメ ー タ B (PB) = SIN(HI) x ATAN (MA ) 
6 ! )? ラメ ー タ ダビ (PC) = EXP(HI/10O) +LOGe (MA) +SQDROOT (HT+MA ) 
7! コ ワク イオ (SUN ) = PA+PB+PC 
| 日 1! 一 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 1 
11 コウ そ ⑦2 ! シン チョ ウ ダイ シ ジ “ ュ ウ H )^ ラ メー タ A リハ “ラメ ー タ B ハ )* ラ メー タビ コ " ウ ケイ | 
101!| ナマ エ H (HI ) (MA ) | (PA) (PB) (PC ) (UN ) 1 
ます ます デデデ エー デニ ニニ デー ニニ ニテ ニニ エニ エニ デニー デー デー ニニ amnmanahnmomankacacacnsamrcpamanacopasocnnasoncーmm エ ニー ニー ニニ ニニ ニニ ニテ ニニ ニニ ニテ ニニ ロニ ニニ ーー ) 
| は 3 ズ | | イセ リ アノ プ | 172 さ 。6 ら 67。9 H よる の 。、/ ア 5 ー1 。12962 25。4 く 291 145.Q5 さ さく! 
| 4 さ | | カタ キリ アキ ラ | 171。4 66。 4 1 11 昌 。9 1 
| 441| ガ 2 ウ MEG |! 172.。2 65。 9 | 11 サ 。 さ | 
231| デリ 4 う 9 し 1614。6 5O. 1 1 105。.B5 | セル E12 の フォ ー ミ ュ ラ と , 相 S 的 に 同じ フォ ー ! 
は 6! | に っ 9 有 0 ヒビ 9 !| 160、 往 48。. 昌 H 104.6 る 5 | ミコ フラガ レプ リ ケ ー ト され , 結果 が 表示 さだ { 
4/1 1 プル が 2 スズ スム  ! 17 き 。 ア メア つ の 。 さ | 124 H 
| 48!) | ん 9 や や 2 ハル | 175.2 70。 2 5 くま 2 る 。/ みみ テー アフ ティ ブ .・ セル i 
1⑦1 1 一 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ニ ーーーーーーーーー 一 I 
20 1 
y EE18 FOrm=(B1 フ ロ +C1 フ ) /2 アク ティ プ ブ ・ セ ル の フォ ー ミ ュ ユラ. FIOur@-6.1 .Q の フォ ー ミ ュ ユラ と 比較 する ご と . 
M1dthi 9 Memoryi21 Last Co1 /Rowi 119 で キ gor HELP 
| 1 > 


Cp Lock Qn | | SCREEN COPY|]IDIR aw || TaB || RuEouTl 


レク 


この よう に , セル E13ーE18 が すべ て 計算 され , 結果 が 表示 され まし た . つま り ,。 セル E12 の フォ 


Figure-6 .1.4 レプ ブリ ケー ト ・ コ マン ド の 実行 . 


や 
や 


ー ミ ュ フ ラフ が, これ ら の セル に 相対 アド レス で レプ リ ケ ー ト され た の で す . セル E18 の フォ ー ミ ュ ラ が , 
スク リー ン の 下部 に 表示 され て いま す の で , Figure-6.1.3 の も の と 比較 し て 下さ い . 
同様 に . 「 イ セリ アキ ノブ プ ブ 」 の 行 の , すでに 書き 込ま れ て いる 各 パ ラメ ー タ の フォ ー ミ ュ ラ を レブ 


ケート し で 完 友 ささ が た が 表 と を 湊 に が に ます 


ン 1 


CPM の アプ リケーション いろ いろ る 


1 4] 1 に ) 1 1 じ Dii E 1 1 志 1 1 


は 1 1 

1 
の 1 SuperCa1c Sample Progr'am for CP/M Learnin ら y5@m 蘭 さ 
1 

H リハ" ラメ ー タ 人 (PA) = (HI+TMA) /2 
ら ! ハ い " ラメ ー タ B (PB) = SIN(HI) :x ATAN(MN) 
6! ハ * ラメ ー タ じ (PC) = EXP(HI/10QO)+LOGe (MA) +SQROOUT (HI+MA) 
7 ! コ " ウ ケイ (SUN) = PA+TPB+PC 
幸 ] | ニー ニーー ニ ーーーー ニ ーーーー デ ーー ツー マーーー ツ ーー デー アア アア ツー クー グー ! 
信和 コウ モ フ | シン チョ ウ が よこ ュ ラク | リラ メー タグ 朋 リ "ラル ー サ お いう ルー9 じ コウ 74 1 
10!! ナマ エ H (Hi ) (MA) 1 (PA ) (PB) (PC) (GUN ) | 
1 1 | | ニモ ニニ エニ ニニ エニー ニニ ニー ニニ ニニ デー ニニ ニニ テニ ーー ニニ ニニ ニー ニニ ニニ デニ ニモ デモ ピー ニー デ デニ デ ビー ど mmammrmmnpmnmmncanenacewrazzzaprconanamnmmnmnomonom 1 
2|| 4 ドリ U アキ / プ | 17 う 3.6 ゐ ム ん マツ | 120。7 う ー1 、 12962 ボ 25。.4 さ 291 145.05 く さく! 


1 う | | カク キリ アキ う | 1 ア 7}1。4 ら 66. 4 | 3118 ダテ 1 。52970 く 3 25。 18992 145。6196! 
14!! カフ 22 ヨシ ヒロ  ! 172。.7 ム う 。 ラ まる ティ 。 1 さ 60921 25。2884 日 144.72461 
まつ | | コウ タオ ラコ 1 161。.6 SO 。 1 1 105。8 ロ 5 ー1 .522 さ 4 2 さ .BOO087 128. 1285! 
16 ム | | ヒュ コウ カ ヒ 9 エ | 160、9 4 昌 .8 1 104。65 ー。 426610 2 さ 。66 さ 1O 127.B865! 
4 プ | | フル 2 スス 4 !| 4175、Z アス 。 う | 124 ー. さ 5 さ 72 く 25。.76108 149。.4074! 
18| | ムラ セ ヤス リル |! 175.2 70。 2 1 よ デ %。 た ー1 。 O さ 708 く 25 。 6494> 147。 さ 12 く 1 
19 1 ! 一 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ニ ーー ! 
20 1 
: 818 Form=EXP(B18/10O) +LNC12+SQRT(B1B+C1B) ハラ メー ジ C の セル し G186 の フォ ー ミ ュ ユラ. 
Midth: 9 Memoryi21 Las5t CoO1/ ド Rowsi 119 マテ すそ ロ F HEL ビ 


1 2 
Cp Lock ロ n | [SCREEN COPY | |DIR As || "TAB 上 RuBouT l 


Figure-6.1.5 完成 し た 表 . 


この よう に , 1 項目 1 つの 計算 式 を 書け ば , あと は 非常 に 楽に 表 を 完成 する こと が で きま す . 
計算 結果 の 数 値 で は な く , フォ ー ミ ュ ラ 自身 を 表示 させ た い 場 合 は , コマ ンド に より 次 の よう に 表 
示さ れ ま す . 各 セ ル は , 現在 , デフォー ルト の 9 文字 に 表示 が 制限 さき れ て いま す の で , 式 の 一 部 し か 
見 を て いま せん (表示 字数 の 変更 は 自由 に 行え る ). 
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1DII コ 

2! SuperCalc Sample Program for CP/M Learnind 5 ら y ソ 55 欄 さ 
さ ! 
4 ! ハ * ラメ ー タ QA (PA) = (HI+MA) /2 
る き ) ハ * ラメ ー タ B (PB) = SBIN(HI) x ATAN(MO) 
6! ハハ * ラメ ー タ じ (PC) = EXP(HI/10OO) +LOGe (MA) +SQRODOT (HIT+MA ) 
7! コ ^ ウ ケイ (SUN) = PA+PB+PC 

1 ! 一 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ! 
な 11 コモ 2 | リリ チョ ウ タイ シン ュ ウ | "ラメ ー ラ 人 A リリ )* ラ メー タグ BB リリ “ラメ ー タ サビ コウ 7 ィ i 
10!! ナマ エ H (HI ) (MA) B (PA) (PB) (PC) (GUN ) 1 
1 1 ! | = ニモ ニニ 呈 モニ デビ = ピ  =  RE PR 5  P P { 
14121 | イセ リ プア キノ フ | | 1Z3。6 67。9 ! (B12+C12 SGIN(B12) EXP(B12/ SUM(E12+! 
1 さ | ! カケ クキ ^ リ アキ ギラ ! 171。4 66. 4 1 (B1 さ + じ 1 さ SIN(B1 さ ) EXP(B1 さ / SUM(E1 さ +! 
141!! が 2 コン ヒロ  ! 172。/ 65.9 ! (B14+C14 SIN(B14)〉) EXP(B14/ SUN(E14+! 
も きき) ゴクウ サイ 3 | 1 る 61 。 ム 6 SO。 1 ! (B15+C15 SIN(B15) EXP(B15/ SUMN(E15+! 


4 ニア 


間 易 言語 (プロ ブラ ムレ ス 言 語 ) の 使用 例 


16! |! ヒュ ウ カ " ヒサ エ |! 160。5 4 日 。 晶 ! (B16+ じ 16 SIN(B16) EXP(B16/ SUN(E16+! 
1 ア [| フ 4 カ げす xx ん 4 | 179。 ア ツク 、 コ 1  (B17+C17 IN(B17) EXP(B17/ SUM(E17+! 
| ま 和 9) | ムラ う セ や スス) リル | 175、 ラ 7O。 2 H (B1B+C1 昌 SIN(B18) EXP(B1 日 / SUR(E18+ 1 
1⑦9! | 一 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 ーーーーーー ニ ーー ニーーーーー ニ ーーー ーー ニーー ニ ーー ニー ニー ニー デーー ニ ーー ニー ニー ee 
20! それ ぞ れ の フォ ー ミ コラ が 表示 され て いる 、 ン 
v H2O 
M1dthsi 9 Memory』21 Laswt Co1 /Rowi 119 ず プ す ロ 上 ト E し ビ 
1 > 
い Cp Lock On |] [ BCREEN COPY RUBOUT 
TTYTT エ YY ママ T プ ママ テ 1Kー「」 ヤ 「 イ すい 0 


Figure-6.1.6 数 値 の 代わ り に , その フォ ー ミ ュ ラ を 表示 させ た も の . 


表 が すべ て 完成 し プリ ンタ ヘタ イプ アウ ト し た 結果 を 示し ます . ロー, - カ ラム の 表示 は , 付け た り 
取っ た り 自 由 で す . 


PC) = EXP(HI/Z100)+LDGe (MA) +SQRDOT (HI+MA) 
1 BU ) = PA+PB+P ヒ 


ー1 . 1 つり 6 つつ 5。 4 さ 291 145 

。 529 ゅ EN 2 和 き 。 18992 145 テー 時 

・1 う 60921 た 2884H 144. っ 
… ・BOO 昌 7 128.1 っ 65 
2 Q 2<。 66310 127.8825 
うら 3 う 7 つう 25.7610B 149.4074 1 
の 370 昌 2 らら 64941 147. さ 12 さ ! 


Figure-6 .1.7 クイ プア ウト され た 完成 し た 表 . 


以上 紹介 し た の は , SuperCalc の 使い 方 の ご く 基本 的 な 簡単 な 例 に すぎ ませ ん . まだ まだ 目 を 見 張 
る よう な 実に 多く の 機能 を 有 し て いる こと を , お 断り し て お きま す . 

さら に SuperCalc に は , メニ ュー・ シ ステ ム が 完備 され て いて ,。 使い 方 や 、。 それ ぞ れ の コマ ンド が 
分 か ら な い 場 合 に は , “7?” 記号 を キー イン する こと に より , その 場 で 必要 を コマ ンド ・ メ ニュ ー 二 。 
コメ ント を いつ で も 表示 ずる こと が で きま す 。 この メニ ュー・ シ ステ ム は ツリ ーー 構造 に だ な っ て いて 、 


ど 4 こ (て. 


6PZM の カプ ワリ ケー ショ ン フン いろいろ 


現在 入力 され て いる コマ ンド に 従っ て , 全般 の メニ ュー つ 細 部 の メニ ュー と いう 具合 に , その 場合 に 
応じ て 必要 な も の が 自動 的 に 出力 され ます . この 辺 の 動き は 実に スマ ー ト で あり , 日 本 の ソフ トワ ウ ェ 
ア ・ ハ ウス も よく 研究 し て も らい た い 点 で す . 


6 .2 スク リー ン ・ エ ディタ の 使用 例 


CP ン M に 付属 し て いる エディ タ (ED . COM) は , 十分 に 強力 で あり , アセ ン ブ ラ や 各種 言語 の ソ 
ー ス . フ ァイル の 作成 に 広く 使わ れ て いま す . ED は 強力 で は あり ます が , それ を 自由 自在 に 使い こ な 
す に は 。 か な り の 吾 練 を 必要 と し ます . 筆者 も , 自在 に 使え を る よう に な る まで は , 区 ら く 1 年 ぐら い 
は か か っ た よう な 気 が し ます . 

自在 に 使い こなせ る よう に な る と , ED の 強力 さ は , 一 般 の パー ソナ ル ・ コ ンピュータ ク に 組み 込み の 
BASIC が 持っ て いる エディ タ (その ほとん ど が スク リー ン ・ エ ディ タ ) と は 格段 の 差 が ある こと が ょ 
く 分 か る よう に な り ま す . 


一 般 の BASIC が 持っ て いる スク リー ン ・ エ ディ タ は , 非常 に 使い 易く , 小さ き な プ ログ ラム の 開発 
に は 大 変 便利 で す が , 大 き な プ ログ ラム の エディ タ と し て は , 機能 不足 で 使い も の に な ら な いと 言っ 
て も 過言 で は あり ませ ん . 致命 的 な 不足 機能 の 主 な も の は , テキ スト 全体 に 対す る グロ ー バ ル な 文字 
列 サ ー チ と 文字 列 の 置き 替え で す (ED の コマ ン ド の MEF…… 2 NMS…… ん SnN…… ヶ に 当たる ). 

そこ で , 使い や すい スク リー ン ・ エ ディ タ で あり , か つ , テキ スト 全体 を グロ ー バ ル に エディ ト 可 
能 な エディ タ が 望ま れる こと に な り ま す . 


6.2.1 Micro Pro 社 の Word Master 


スク リー ン ・ エ ディ タ は , 数 社 か ら 発売 され て いま す が , その 代表 的 な も の は , ここ で 取り 上 
Micro Pro 社 の Word Master で す . Micro Pro 社 は , 有名 な 英文 ワー ド ・ プロ セッ サ の “Word 
Star? で 広く 知ら れ て いる ソフ トウ ェ ア ・ メ ー カ ー で あり , エディ タ で ある この Word Master も , 
CP ノ M 上 の スク リー ン ・ エ ディ タ の 代名詞 に な っ て いる ぐら い に 広 く 使 われ て いる エディ タ で す 。 


Word Master は 。 誰 で も すぐ 使え る 便利 な スク リー ン ・ エ ディ タ と テキ スト 全体 を グロ ー バ ル に エ 
ディ ト す る 機能 を 合わ せ 持 っ て お り , その た め に , 2 つの エディ ト ・ モ ー ド を 備え て いま す . 


@ VIDEO モー ド 
@e COMMAND モー ド 


の 2 の で あり 。 M 提 EEO モー ド が ネ ク リ ー ン ・ エ ディ タ の モー ド で あり, COMMAND モー ド が , 紀 衣 / 


つ 4 


スプ フーン ・ エ ディ タ の 使用 例 


M に 付属 の ED と , だ いた だ たい コマ ンド ・ コ ン バ パチ ブル な ポイ ンタ 形式 の エディ タ の モー ド で 。 グロ ー 
バル な エディ ッ ト が 可能 で す . エディ ッ ト 作 業 は , この 2 つの モー ド を . 場合 に 応じ て 切り 替え な が ら 
進め て 行く 訳 で す . モー ド 切 り 替 え は 簡単 で あり , VIDEO モー ド か ら COMMAND モー ド へ は "ESC? 
キー の 入力 , その 逆 は "VJ』” の キー 入力 に より 瞬時 に 切り 替わり ます . 


6.2.2 Word Master の 実行 例 


実際 に Word Master を 起動 し て , CPM に 付属 し て いる DUMP プロ グラ ム の ソー ス ・ フ ァ イ 
ル “DUMP . ASM”" を エディ ッ ト し て み ま し ょ う . CPM マシ ン に は , PC-8801 を 使い NEC の 
CPM を 走ら せ て い まま 。 以下 の リス ト は , その SCREEN COPY の 機能 に より タイ プア ウト し た 
も の で す . 


Word Master を 実行 する に は , 2 つの ファ イル , 


WM. COM 
WIM 。 ELP (ヘル プ ・ メ ニュ ー の 表示 を し な けれ ば , これ は 必要 な い ) 


が 必要 で す . “ 
Word Master が ドラ イブ A:。 "DUMP . ASM" が ドラ イブ B: 上 に ある と し て , Word Master を 


起動 し ます . その 様子 と , 起動 直後 、. ほん の わずか の 間 表 示さ れる 製品 メッ セー ジ を 湊 に 示し ます . 


1 
YS 


3 2 9 
NR 9 


SS 0 ーー _ 88 ー。 : 、 | 3。 -ー ーー - SA SS S 
_ LCP Lock On |[SCREEN COPY]IDIR Ai |]| TAB | 
ーーー ーー 一 ーー ーーーーーーーー ーーーーー』 トレ ーーー ーー ーーーーーーーーーーーーーーJ ーーーーーーーーーーーー』 し ーー 一 - 


計 


Figure-6.2.1 Word Master の 起動 と オー プ ニ ン グ ・ メ ッ セ ー ジ . 


は ん の 少し の 間 , 上 の メッ セー ジ が 現れ , その 後 す ぐに 画面 の オー ル ・ ク リア が 行わ れ , テキ スト 
で ある "DUMP . ASM” の 最初 の 1 ペー ジ が 表示 され ます . 「 

その 状態 を 次 に 示し ます . これ は 自動 的 に 行わ れ , ED の よう に , アペンド の コマ ンド を 実行 する 必 
要 は あり ませ ん . 以後 も 、 アペンド や セー ブ は 自動 的 に 行わ れる の で , ED の A コ マン ド や W コ マン ド 
に 相当 する も の は 全く 必要 あり ませ ん . 


ン B5 ら 


ビジ と 秒 の アプ リグ ーション いる ろ る いろ 


5 8 SS SR 時 82 0 SS SS 3 AN は 0 へ 
/ 起動 し だ 直後 の カー ソル の 位置 
。 
国 FILE DUMP PRDBRAM。 READS AN INPUT FILE AND PRINTS IN HEX 
H 
1 COFYRIGBHT (C) 19755。 1976。 1977。 1978 
: DIGITAL RESEARCH ーー 
2 SPX a フ 9。 BAPYF IL nhn 画面 全体 が フリ ア さ れ て , ご の よう に エディ ツ 
『 3 ト さ れる テキ スト の 最初 の 1 ペー ジ が 表示 され 
5 CALIFURNTIA 。 9395 ひ る . カー ソル は 左上 端 に ある . 
5 
QRG 10QH 
BDQS EQU QOOQ5H sDOS ENTRY POINT 
CONS EQU 1 sREAD CONSOLE 
TYPEF EQU ー- sTYPE FUNCT ION | 
FRINTF EQU 9 s BUFFER PRINT ENTRY | 
BRKF EQU 1 1 3 BREAK KEY FUNCTIDN (TRUE IF CHAR READY) 
DPENF EQU 15 sFILE UPEN 
READF EQU 2 っ oO s READ FUNCTION 
9 | 
FCB EQU CH sFILE CONTR ロ L BLUCK ADDRESS | 
BUFF EQU BOH s INPUT DISK BUFFER ADDRESS | 
9 | 
5 NON GRAPHIC CHARACTERGS | 
CR EQU ODH 3 CARRIAGBE RETURN 
し F EQU OAH sLINE FEED | 
| 


| Ep Lock ロ n | | SCREEN COPY RUBOUT 


KR 3 ジジ 


Figure-6.2.2 WM が 起動 し て 、 テキ スト の 1 ペー ジ 目 が 表示 され た と ころ . 


この 後 , 2 3 の 簡単 な エディ ッ ト を 実行 し て み ま す が , その 前 に ,、 どの よう な コマ ンド が ある の 
か を mA っ テニ ュー で 見 て な まま PE よう 。 

Word Masteer の ヘル プ ・ メ ニュ ー は , いつ どん な 時 で も Ctrl-J を キー イン する こと に より 表示 させ 
あこ と が の 送 ます 、 

Ctrl- チ 了 を キー イン する と , まず 次 の コマ ンド ・ メ ニュ ー が 表示 され ます . 


9 
NN 

-VIDEU MODE SUMMARY (TYPE “JJ FOUR NEXT FRAIE ) ハ 

“ 村 INSERTIUN UN/UFF RUD DELEIE CMR し KC「 

^ ら 8 CURSUR LEFT CHAR ^ ロ DELETE CHR _ RIGHT 

し CURSUR _ RIGHT CHAR 学 DELETE MORD LEFT 

人 CURSOR LEFT MORD 人 ま DELETE MORD RIGHT 

Me CURSUR RIGHT MORD 2 DELE1E LINE LEFT 

^Q CURSUR RIGHT TB へ DELETE LINE RIGHT 

0 CURSOUR UP LINE io 4 DELETE MHOLE LINE 

X CURSOR DOUMN LINE 2 PUT TAB IN FILE 

2 CURSOR TOUP/BOT (HOME ) ^N PHT CERLF IN FL に 

CURSOUR RIGHT/LEFT の DO NEXT CHR 4X 


ン 86 


スク リー ン ・ エ ディ タ の 使用 例 


谷 し ) FILE DQMN 1 LINE へ NEXT CHR IN FILE 
の ト FILE し に }) し j ト NE 0 / ViO CONTROL 

殿 FILE DOMN SCREEN ESC EXIT VIDEO NMODE 
^C FILE UP SCREEN …J DISPLAY THIS 


コマ ンド ガ 分 が ら な い 場 合 は ,。 いつ , どん な 時 で も Ctrl-J9 を キー イン する ご こと に より の , この コマ ンド ・ メ ニ 
ユー が ガ が 表示 され る . 

この メニ コー は ,。 ビ デオ ・ モ ー ド (スク リー ン ・ エ ディ タ の モー ド ) の ペー ジ で あり の 。 さ よら に GtrI-J を キー 
イン する ご と に より の , 次 ペー ジ の メニ ュー が ガ 表 示さ れる 、 

Ctr-JB 人 の も の を キー イン する と , 元 の 状態 の まま の テキ スト に 戻る こと が で きる . 


Cp Lock Dff| [SCREEN COPY RUBOUT / 


で 


Figure-6.2.3 ヘル プ ・ メ ニュ ー の 最初 の ペー ジ . VIDEO モー ド の コマ ンド ・ メ ニュ ー. 


続い て 同じ く Ctrl-」 を キー イン する と, 次 の ペー ジ の コマ ンド ・ メ ニュ ー が 表示 され ます . 


/ COMMAND MODE _ SUMMARY  (TYFE “JJ FUR _ NEXT FRAME ) \ 


| キー 村 EANS + OUR - ALLUMED HERE。 + ASSUMNED IF 0DNHITTED 
| る の MEANS CARRTIAGE RETURN UR LINE FEED NECESSARY HERE 
トコ MEANGS ESC DUR ^Z OUR CARRIABE RETURN NECESSARY HERE 
n MEANS QR NUMBER。 1 ASSUMED IF UMITTED。 本 = 655 く 5 


| まこ n し MUVE n CHARACTERS +ーn ロ D DELETE n CHARACTERS 「 
キー に し MOUVE n LINES +ー ロ に KILL(DELETE) n LINES 

| + ォ ーn ロ T TYFE n LINES nZ SLEEP n SECUNDS 

8 | 2 MOUVE 。 TYPE n PAGES キー ロ の MOVE n LINEB。 TYPE 1 


n エ も tex 七 叶 INSERT tex モ 上 n TIMES 

いり ENTER INSERT MODE (ESC OUR “Z EXITS MODE ) 

Qp。 nQtex 上 まあ (APPEND) DO 1L THEN JUST LIKE INSERT 

は 。。。。 LOOPs REPEAT .。.。。 n TIMES (DEFAULT = 655 さ ら 5) 


| コマ ンド ・ メ ニー ユー の 2 バー ジ 自 . コマ ンド ・ モ ー ド (ポイ ン ツ 形式 の エディ ツ ・ モ ー ド ) の メニ ュー の 1 ベ ペ 
| シン 
で きる . 


Ch Lock Off| [SCREEN COPY RUBQUT 


Figure-6.2.4 2 ペー ジ 目 . COMMAND モー ド の コマ ンド ・ メ ニュ ー. 


で は , 2ー3 の 簡単 な エディ ッ ト 作 業 を 示し ます . 内 容 は リス ト 内 の 解説 文 を 参照 し て 下さ い . ま 
だ な 。 HPe-5.2.3 の コマ ンド ・ メ ニュ ー も 箇 呈 し て 下さ るい . 


アコ ニル 4 


CPM の アプ リケーション いろ いろ 


レン - ーー ーーーー- ー ー ー ーーー ーーーーーーーーーーーーーーーー 


と ン この 位置 か ら , Ctrl-x を 4 回 キー イン する こと に より , カー ソル が 4 ライ ン 下 方 に 物 動 。 
2 
突 FILE DUMP FROUGRAN 。 READG AN INFUT FILE AND PRINTS IN HEX 
日 
H し は PVYRTIBNT () 1778。 1976。 1977。 1976 
| s DIGITAL RESEARCH 
| 角 - - この 位置 か ら , Ctrl-N を 3 回 キー イン する こと に より の , 3 ライ ン 分 の 空白 スベ ー ス を ここ に 割り 込ま せ だ . 
3 ライ ン 分 の 空白 スペ ー ス . 
3 BOX 579。 FACIFIC BRUVE 
CALIFDRNIA。 9395O 
5 
ORG 1QOH 
BDOS EQU OQQOSH  。 』DOS ENTRY POINT | 
CUNS EQU 1 s REQAD CONSOLE 
TYPEF EQU っ s TYPE FUNCT I ロ N 
| PRINTF EQU 9 3 BUFFER PRINT ENTRY | 
BRKF EQU ま s BREAK KEY FUNCTIOUN (TRUE IF CHAR _ READY ) 
DPENF EQU 15 sFILE OPEN 
| READF EQU 2O 5 READ FUNCTION 
! 「 
FCB EQU 5CH sFILE CONTRDL BLOCK ADDRESS 
BUFF EQU BOH sINPUT DISK BUFFER ADDRESS 
5 
CP Lock ロ ff| | SCREEN COPY ドー 
ノ 
Figure-6.2.5 スク リー シン ・ 王 姜 む 玉虫 柚 に 
FILE DUMP PRKOUGRAM。 READS QN INPUT FILE AND PRINTS IN HEX し へ 


ね UPYRIMHT (し ) 1970。 | サザ サ /6、 1 サ プ //。、 497B 
DIGITAL RESEARCH 

い 〇 し dMa5t ら Gr amD1 ら 上 un< 
じ t レ 1 一 N = In ロビ t 11nG。 
し 1n ロ 与 1n55 己 ビ t amD1 ロレ 


コン トロ ー ル ・ キ ャ ラク フタ 以外 は , キー イン レ し だ も の は すず すべて, その カー ソル 位置 に 
置か が れる. Word Master は , 画面 表示 = テキ スト の 内 容 で ある . [ 


"DD11 こ Cation C じ P/NM" 。 


vs Nee ee | 抽 | で = や" er 


| 
BDX 579。 PACIFIC BROVE ヽ 
Ye ヽ 3 ライ ン 分 の 空白 スペ ー ス に , 適当 に テキ スト を 書き 込ん だ . | 
9 各 ラ イン の 最後 に キヤ リッ ジ ・ リ マン の 入力 は いら な い . | 
RG 1 OOQOH 
BDOS EQU OQO5H 』DOS ENTRY POINT 
CONS EQU 1 READ CDNSDLE 
TYPEF EGO 由 5TYPE FUNCTIUN 以下 は , オリ ジ ナ ル の テキ スト と 比較 し て 下さ い . 
PRINTF EQU 9 3 BUFFER PRINT ENTRY 
BRKF EQU 11 5 BREAK ]<。- こ の 位置 に カー ソル を セツ トレ て , CtFI-K を キー イン する と , 
DPENF EQU 15 sFILE 3Edwf ロ | ご の よう に , カー ソル 以後 , ラ イン の 終わ り ま て が 削除 され る . 
READF EQU 2 っ oO s READ この 位置 に カー ノル を セツ に し て , 双 字 を モー イン し て 行く と 「 
ンー 元 の テキ スト が 書き 替え られ て 行 ぐ . い ー 
5 ヾ FUNCTION* の \C* の 位置 に カー ノル を セツ ト し て , RUBOUT を キー イン し て 行 ぐ と, カー ソル の 左側 の 文字 が 削除 きれ て 行 ぐ . 
FCB EQU ら 5CH 3FILE CON12 さ 45 く <RDL BLOCK ADDRESB RUBOUT を 3 回 キー イン し だ 個 . 
BUFF EQU BOH 3 INPUT DISK BUFFER ADDRESS 


スソ リー ン ・ エ ディ タマ の 使用 例 


| Cp Lock ロ ff| [SCREEN COPY RUBOUT | 


Figure-6.2.6 ぇ え ぇ グリー と ・ エ ディ ッ ト 便 , 


Word Master の スク リー ン に は , メモ リ 上 の エディ ッ ト ・ バ バッファ の 一 部 が 表示 きれ て お り , スク 
リー ン 上 の 変更 は , すなわち , エディ ッ ト ・ バ ッ フ ァ の テキ スト の 変更 で ある 訳 で す 。 

捧 に VIDEO モー ド か ら , COMMAND モー ド に 切り 替え た て み ま し ょ う . “ESC”" キー の 入力 と 同時 
こ COMMAND モー ド に 切り 替わり ます . 


| BDQS EQU OQOO5H 』DOS ENTRY POINT | 
| CO ロ NGS EQU 1 s READ CONSOLE | 
| TYPEF EnU 2 5sTYPE FUNCT IN 
| PRINTF EQU 9 # BUFFER PRINT ENTRY | 
| BRKF EQU 1 1 3 BREAK | 
| OPENF EQU 4S5 sFILE abcdefqg | 
| READF EQGU 2o 3sREAD CTION | 

5 | 
| FCB EQU 9 sFILE CON12 さ 45TRDL BLOCK ADDRESS 

BUFF EQU ・ 1NPUT DISK BUFFER ADDRESS - 

25 の 画面 友 下 端 に **/ ガ 表示 され , コン ンド に ・ モ ー に に 切り 替わる *? は コマ ンド 

ち ー ド の フロ ンプ ト 。 現在 は スプロール up され 。 ご の 位置 に 来 だ 。 


| OU CPZM の `ED* と 同様 に ,10 ラ イン 分 を ツイ プア ウト する . コマ ンド ・ モ ー ド で の 実行 . | 
| FILE DUMP PROGRAM。 READS AN INPUT FILE AND PRINTS IN HEX | 
1 


COPYRIGBHT (C) 1975。 1976。 1977。 1978 | 
40 ラ イン 分 が | 


5 
H 
DIGITAL RESEARCH | 
に MordMaster sample run<。 イブ ジウ ト | 
< Ctr1-N = Insert 11ne. され て いる | | 
1 し Lin 1n5Grt swample for "Application CP/M" 。 

| BODX 579。 PACIFIC GBROVE 

| CALIFURNTIA。 9 さ 95O | 
4 | 
まま ー ャ コマ ンド モー ド の プロ ンプ ト 、 2 ピ デ オ ・ モ ー ド に 戻る に は , "V!“ を キー イン する . [ 

[CE Lock Qff| [SCREEN COPY] [DIR ar |] | Tag | 
2 / 


Figure-6 .2.7 ESC キ ー の 入力 に より COMMAND モ ー ド に 切り 替わる . 


エディ ッ ト を 終了 する に は , ED と 同様 に E コ マン ド を 実行 し ます . 

Word Master は 、 この よう な 感じ で エディ ッ ト 作業 を 行っ て いく 訳 で す が ,。 スク リー ン ・ エ ディ ッ 
ト 時 に 多用 する カー ソル の 移動 と .。 スク リー ン の スク ロー ル に 関す る キー の 配列 を 示し て お きま す . 

次 の 図 の よう に , CTRL キー の 近く に ダイ アモ ンド 形 に 配列 さき され て いて , 慣れ る と 大 変 具合 が いい 
も の で す . 


4 オニ に ) 


CPM の アプ リケーション いろ いろ 


ーー ヤッ 
示 


は カー ソル を 1| ラ イン 上 に 移動 
は カー ソル を 1| 字 右 に 移動 


! 


は カー ソル を 1 単語 右 に 移動 
は テキ スト を | ライ ン 上 に スク ロー ル 
は テキ スト を | スク リー ン 分 上 に スク ロー ル を 示す 


折 


2 


ルン チ - 


S 


Figure-6.2.8 カー ソル 移動 と スク ロー ル 関 係 の キー 
6.3 スク リー ン ・ オ リエ ン テ ッ ド な ソフ トウ ェ ア と ター ミナ ル の 適合 に つい て 


スク リー ン ・ エ ディ タ に 限ら ず 。 ワード ・ プ ロ セ ッ サ や , 6. 1 章 の 簡易 言語 な ど , スク リー ン 上 に 
表示 され た それ ぞ れ の 位置 を 対象 と し て いま す . この よう に , いろ いろ な 操作 を 行う スク リー ン ・ オ 
エン ティ ッ ド な (その ター ミナ オル 宮 コ ン ビ ピュー ネ で 上 か が 動 あな ゆい ) アデ リ ケー ショ ンプ や ヤセ グラ 
ム の 実行 に は は, それ ぞ れ の コル ピュ ー タ に , 各種 の スク リー ン ・ コ ント ロー ル の 機能 が 必要 で す . 

スク リー ン ・ コ ント ロー ル 機 能 の 主 な も の を 列記 する と , 


@ 画面 全体 の クリ ア , 

@ カーソル を ホー ム 位 置 (左上 端 ) に セッ ト . 

@ カー ソル の アド レッ シン グ (任意 の 位置 に セッ ト ). 

@ カー ソル 位置 か ら , その ライ ン の 終わ り ま で の イレ ー ズ . 
@ カー ソル 位置 か ら , 画面 最後 まで の イレ ー ズ . 

@ 光度 の コン トロ ー ル . 


な ど で あ り ,。 これ ら は 。 一 般 的 を な エス ケー プ ・ シ ー ケ ンス な ど で コ ント ロー ル 呈 能 で な けれ ば な り ま 
ん 


6.3.1 エス ケー プ ・ シ ー ケ ンス と は 


エス ケー プ ・ シ ー ケ ンス と は 。 エスケープ ・ コ ー ド (1BH) に 続く アス キー・ キ ャ ラク タ の 組み 合 
わせ を シー ケン シャ ル に スク リー ン に 出力 する こと に より , 上 記 の 各 機 能 の コン トロ ー ル な ど を , そ 


う 300 


スク リー ン ・ オ リエ ン テ ッ ド お な ソフ トウ ェ エア と タダ ターミ ナル の 適合 に つい て 


れ ぞ れ の 組み 合わ せ に 従っ て 行わ せる も の で す . 
例え ば ,。 アメ リカ で 大 変 ポ ピュ ラー な CRT ター ミナ ル で ある , SOROC IQ-120 の エス ケー プ ・ 
シー ケン ス の 実例 の いく つか を 示し ます と , 


@$ ス クリ ー ン の オー ルク リプ アー の ーー バー バー ドー 「ESC] * (つま り 1BH, 2AH) 

@ カー ソル 位置 か ら そ の 行 の 終わ り ま で を イレ ー ズ …[ESC]T (つも 上 粒 、 5 

@ カー ソル 位置 か ら 画 面 終わ り ま で を イレ ー ズ ………… [ESC]Y に は ませ も 統計 99) 
0 た だ も ウシ シング oe ーー [ESC] = (y) (x) (つま り 1BHL, 3DH, yyH, xxH) 


と いう 具合 で す . 

これ を 上 只 條 的 に 説明 する と ,。 スク リー シ の オー ル ・ ク リア の 場合 は エス ター ズ ・ コ ー ド の 1 BBH, 
それ に "* ま "の アス キー・ コ ー ド で ある 2 AH を , 1BH。 2AH と 連続 し て コン テール に 出 衝 る こ 
と に より ,。 コン ソー ル は , それ を スク リー ン の オー ル ・ ク リア で ある と 解釈 し , 実行 し ます . 

も うー 便 ま も で スク リー テン 上 の あこ 30、 を 100 の 0 ボイン ま 。 つや お ませ 。、 チ ドレ ス (20 抽 の お イシ 
ト に カー ソル を セッ ト す る 場合 は 。 1BH, 3DH, 2AH(= ニ 32 十 10)。 3EH(=32 十 30) の 4 バイト 
を 連続 し て コン ソー ル に 出力 すれ ば 良い の で す ., SOROC 1IQ-120 の カー ソル の アド レッ シン グ の XX, 
Y 座 標 に は , それ ぞ れ 32( テ 20H) の バイ アス 値 が 加算 きれ ます . つま り , 原点 は 左上 端 で あり , その 
座標 ( 傘  Y) は (0. 0) で は な く 〈 (90 20H) で ある 二 て で を 。 

また スー シ ・ コ ロン よら ロール は 。 ここ 析 あの エス ケー アシ ーー テン スズ に よる も 2 はげ び で みく 【? っ 
ント ロー ル ・ キ ャ ラク タ に よる も の も 併用 きれ る の が 普通 で す . 


玉 包 は 角 理 OCGC 1Q-120 CRT メー ミナ チル の 仙 で まだ が エス ケー ブ プ ・ う エー る る ああ 。 と 邊 和え デシ 
ー ケ ンス に する か は , 残念 を が ちら 統 一 親 格 と らい う も の は な く 《, ター ミナ ル の メー カー に よっ て まち ま 
ち で す . 

を そこで, ユー ザー は ,。 それ ぞ れ 自分 の ター ミナ ル に 合わ せ て , 使用 ます る ソフ キ 京 = 子 の ス 名 リー シン 
出力 部 の ルー チン を 書き 替え な けれ ば な ら な いこ と に な り ま す . 


6.3.2 自分 の ター ミナ ル に 適合 させ る た め の ス クリ ー ン 出力 部 の 変更 


スク リー ン ・ コ ント ロー ル の コン トロ ー ル 法 は 統一 きま れ て お ら ず , ユー ザー は , 次 の 実行 例 に も 示 
され て ぷる よう を いろ ぬら を ター ミナ ル を 使用 と て いま す 。 し か も テー ザー が それ ぞ れ 目 分 の 
使用 し て いる ター ミナ ル に 合わ せ て ,。 スク リー ン ・ オ リエ ン テ ッ ド な ソフ トウ ェ ア の スク リー ン 出 力 
ルー チン を , いち いち 書き 直す の で は 大 変 で す . 

そこ で 5 1 才 9 に ーー し tr エ だ ゃ ま 和 和美 環 靖 年 。、 介 の スタ サー ン ュ オ サ エ シル ザッ ギ を アプ トマ ェ テ 
製品 の 多く は , それぞれ の ター ミナ ル に 簡単 に 適合 さき させ る た め の 特 別 な が プロ グラ ム を 用 意 し て いま す . 


う 0 1 


じじ ピン M の アプ リケーション いろ いろ 


その 1 つ を 。 実例 と し て 示し ます . 

6 . 1 章 で 紹介 し た 簡易 言語 の SuperCalc は , スク リー ン 表 示 を フル に 活用 し た ソフ トウ ェ ア で あ 
り , その 実行 に は , 各種 の スク リー ン ・ コ ント ロー ル が 必要 で す . それ ら の スク リー ン ・ コ ント ロ 
ー ル の 機能 を 持た な い CPM マシ ン で は , 実行 する こと は で きま せん . 

SuperCalc に は ,. いろ いろ な ター ミナ ル に 自動 的 に 適合 させ る た め の プ ログ ラム “INSTALL . COM?/ 
が 付属 し て お り , 誰 で も 極め て 簡単 に 自分 の 使っ て いる ター ミナ ル に 適合 させ る こと が で きま す . 

次 に この ブログ ラム を 起動 し て , 途中 の 設問 に 答え た 状態 の スク リー ン の 表示 の 一 部 を 示し ます . 


co 


Y。 Mrite SuperCalC 上 O disk 
(w1th any Chand ら SS madG SO far。) 
Z。 Ed1it pr1inter and termina1 data 


JINSTALL. COM“ の 起動 後 ,2--3 の 問 に 答え だ 後 . 了 
with SUPERCALC 。 
Current terminal1 』 Soroc 20 | 現在 の SuperCalc は , SOROC (O ひ -120 用 に な つて いる こと を 志す. 
人 n。 nADDS H。 Te1 evi deO | 
B。 apple 【!1 1T 。 Vs い ua ゅ 1 
C。 Beehi ve り 。 XerOx | これ だ け の 種類 の ター ミナ ルカ ら , 自分 の 
D り 。 DEC K。 Zenith ター ミナ ル と 同じ , まだ は 同等 な も の を 
E. Haze1tine し .。 Infoton (GTC) が 9 る. 
| F。 Lear Sieq1er M。 ANST Standard 
| は 。 Soroc 
| 


Enter A-M。 Y。 Z or ? s』 D--DEC の ター ミナ ル を 選択 し だ . 


You have se=1eCted a& DEC termina1 。 
Te 上 m1na155 SUDDOLted si 
1。 VT-52 (or COmpatiD16e) | EC の マー 


2。 VECY0D (Gr Gunattbie) ) ミナ ル の 中 で も , この うち どちら か の 問い . 


X。 Return to terrmina1 se1e@ こ tioOn 
モ だ nter 1。 2Z (gr X) 』 


さら に この よう お な お 対語 形式 で 作業 を 進め て 行 ぐ と , 自動 的 に 
目的 と する ター ミナ ル 用 の SuperCalc が で き 上 る . 
EN ウ は け ビ ヒ ビ ザ 還 上 す &ー オ ト トト トラ ヶ ケープ 人 人 四 オガ オ 人 人 ゾ †【 人 ぜ 人 ぜ ザ 伯 人 【†{ リ ーー 人 人 人 9 す 人 トッ ンー 


Figure-6.3.1 SuperCalc の 各種 クー ミナ ル に 適合 きせ る た め の '1INSTALL" プ ログ ラム の 実行 の 一 部 . 


この よう に , や さ し い 対話 形式 な の で , 専門 の 知識 を 持っ て いな く て も 誰 で も 簡単 に 自分 の ター ミ 
ナル に 適合 させ る こと が 可能 で す . Apple II に も 適合 で きま す の で , Apple ユー ザー は お 見 逃し な く 〈. 
た が し 。 マイ オク グロ ソサ トト 二 の えみ 半 メラ ト み ー ド に よる PP と の 拉 で 

も し, リストア ッ プ され て いる 。 ど の ター ミナ ル と も 同等 で な い 場 合 は 。 DDT な ど を 利用 し て , 直 
接 。 該 当 部 分 の ルー チン を 書き 替え る こと に な り ま す . 


CP ノ M マ シン と PROM 書 込 本 と の 授 続 


以上 は , SuperCalc の 各種 タク ー ミ ナル に 適合 させ る プロ グラ ム の 一 例 で す が , 他 の スク リー ン ・ オ 
リエ ン テ ッ ド な ソフ トウ ェ ア も , まとも な 製品 な ら ば , ほとん ど が この よう な 便利 な プログ ラム を 付 
属さ せ て いま す (Multiplan や CIS-COBOL の も の は 特に 良く で き て いる )、. 

この よう に , 最近 の ソフ トウ ェ ア は , スク リー ン ・ オ リエ ン テ ッ ド な も の が 多く な り ,。CP ン M セ シ 
ン の ター ミナ ル は , 各種 スク リー ン ・ コ ント ロー ル が サポ ー ト され て いる も の を 使う こと が 必須 と な 
っ て いま す . 


6.3.3 パー ソナ ル ・ コ ンピュータ の 場合 


パー ソナ ル ・ コ ンピュータ で , この よう な スク リー ン の 機能 が 最初 か ら サ ポー ト さ れ て いる も の は 
少な く , し か た な く CPM の BIOS 内 に 組み 込ま な けれ ば な り ま せん . 非常 に うま く < BIOS 内 に ス 
クリ ー ン ・ コ ント ロー ル 機 能 を 組み 込ん だ 例 と し て は , NEC の PC-8000 シ リー ズ 用 に NEC が 発売 
し て いる CP ン M や , 沖の if800CP ン M な ど が その お 手 本 で す . ーー 

これ は , BIOS 内 に , 前 述 の SOROC IQ-120 と 等 価 の ス グル リラ ンコ ント ロー ルッ ルー ナン を 組み 
込ん を だ も の で , ユー ザー は , PC-8000 レ リーズ の パー ソナ ル ・ コ ンピュータ の スク リー ン を SOROC 1Q 
-120 と 思っ て 使用 する こと が で き , 各種 の スク リー ン ・ オ リエ ン テ ッ ド な ソフ トウ ェ ア を 自由 に 実行 
する こと が 可能 で す . 

よっ て , パーソ ナル ・ コ ンピュータ の CPM を 購入 する 際 は , この 点 も よく 確認 し な けれ ば な り 
ませ ん . 非常 に 重要 な ポイ ント で す . 


6.4 CPM マシ ン と PROM 書 込 器 と の 接続 


CPM 上 で 開発 し た プロ グラ ム を PROM に 固定 し た い 場 合 , ある い は , すでに 書き 込ま れ て い 
る お KOM 上 の デー タ を 読み 出し て , 逆 ア セン プラ な ど で 解 析 し た い 場 合 な どの 。CP/M マシ ン と 
PROM 書 込 器 と の 間 の デー タ 転 送 の 実例 を 紹介 し まし ょ う ). 「 

と は 言っ て も , この よう な こと は 一 項 を 設け て 解説 する まで も な く , PIP コマ ンド を 使い こなせ る 
ユー ザー で あれ ば , 造作 も な いこ と な の で す が , RS-232C イン ター フェ イス は , た っ た 3 本 の 線 で 接 
続 す る だ け で 相互 に 通信 可能 で ある こと な ど を 含め て , 実例 で 示し まし ょ う (PIP コマ ンド の すべ て 
の 穂 い 方 は , 「 実 習 CPM」 の 4. 2 章 で 解説 し て いま す , 参照 下さ い .). 

使用 する PROM 書 込 器 に は , RS-232C の イン ター フェ イス が 装備 され て お り 。 インテ ル HEX 形 
式 の デー タ の 送受 が で きる ソフ トウ ェ ア が 内 蔵 さ れ て いる こと が 前 提 と な り ま す . 大 抵 の 本 格 的 な PROM 
書 込 器 は 、 この よう な 機能 を 持っ て いま す ., 「 

一 方 、 パ ー ソ ナル ・ コ ンピュータ で な く ,。 ソフ トウ ェ ア 開 発 用 の マシ ン は , PROM 書 込 器 が 内 蔵 き 
れ て いる の も 多く , 独立 し た 書 込 器 を 使う 必要 は あり ませ ん の で , ここ で の 解説 か ら は 除外 し ます . 
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BZM の アア チリ ケー ショ ン い る ろ る いろ 


6.4.1 RS-232C と イン ター フェ イス の 接続 


RS-232C イン ター フェ イス の コネ クタ の 一 般 的 な 標準 は 。25 ピ ン の D 型 コネ クタ で , 次 の ピン ・ 
アサ を えよ に な っ て ふい ます 


CG (chasis GND) ケース の GND 

TD (Tx Data) 導 橋 デー タ 

RD (Rx Data) 人 信 デ ー ダ 

RTS (Request ToSend) 送信 要求 

CTS (Clear ToSend) 送信 可 

DSR (Data Set Ready) デー タ 送 受 可 

SG (Signal Ground) 信号 GND 

CD (Carrier Detect) キャ リア 検出 

DTR (Data Terminal Ready) デー タ 送 和 受 可 


矢印 の 向き は , コネ クタ か ら 見 た 信号 の 流れ . 


上 記 の ピン ・ ア サイ メン ト は , 一 応 の 標準 で は あり ます が , 統一 され て いる 訳 で は あり ませ ん の で , 
各社 まち まち な の が 現状 で す . 

そこ で 。CP ン M マシ ン と PROM 書 込 器 と の RS-232C イン ター フェ イス 相互 の 接続 は . それ ぞ れ 
の ハー ギ ウ ェ ア ・ マ ニュ アル に 従っ て 行わ な けれ ば な り ま せん . 


! 


PC -8001! の CPM に 接続 され た PROM 書 込 問 
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C じ ピーM マ シン こと FROM 書 込 器 こ の 接続 


KRS-232C の 動作 は , 各種 コン トロ ー ル ・ ラ イン に よっ て , コン トロ ー ル され て , 高速 の シリ アル 伝 
送 が 可能 と な り ま す が , 300 ボ ー 以 下 程度 の 速度 で あれ ば , コン トロ ー ル ・ ラ イン に よる 制御 を 受け ず 
に デー タ の 送受 が 可能 で す 。 

300 ボ ー の 低速 で は , PROM 書 込 器 を 頻繁 に 使う ユー ザー に と っ て は , 仕事 に と 思わ れ ま 
す の で , きち ん と ハン ド シ ェ イク を 行っ て 高速 伝送 が 可能 と な る よう PS この 仕事 は 
それ ぞ れ の イン ター フェ イス の マヤ マニュアル が 不備 で あっ た り し て , な か な か うま く 行 か な 


ここ で は 。 次 の 図 に 下す よう に , コン トロ ー ル ・ ラ イン を 全く 相互 に 接続 せ ず ,。 GND と Tx。 Rx 
の 3 線 で 接続 し , 300 ボ ー 以 下 で 使用 する こと に し て , PROM 書 込 器 と の 転送 作業 を 行っ て み ま し ょ う ). 
この 方 式 で す と , 大 抵 の RS-232C 機器 間 で 無 条件 に 伝送 が 可能 で す (イン ター フェ イス に よっ て は , 
分 自身 の コネ クタ 内 で , コン トロ ー ル 線 を ジャ ン フ パパ す る 必要 が ある か も 知れ ませ ん ). 


300 ボ ー 以 下 で 使用 する 場合 は , 3 線 の み 
の 接続 で 相互 の 伝送 が 可能 で す . 


CPM マシ ン 側 PROM 書 込 問 側 


Figure-6.4.1 RS-232C を 3 線 で 相互 接続 


6 .4.2 CPM て 開発 し た プロ グラ ム の PROM 書 込 器 へ の 転送 


面 者 の 間 は , Figure-6.4.1 に 示さ れ て いる よう に 接続 きれ て お り , ボー レー ト は 両者 共に 300 ボ ー に 


設定 され て いる と し ます . 
開発 され た プロ グラ ム は , イン テル HEX 形式 @ フ ァイル ` 羽 OM PE と で おり て お く 〈) で ディ 
スク 上 に ある と し て , 2 KK バイ ト 未 満 の オブ ジェ クト で 2716 タ イプ の PROM に 書き 込む 場合 の 手順 


いも まっ 


1. まず , PROM 書 込 器 の マニ ュ ア ル に 従っ て , RS-232C イン ター フェ イス か ら デ ー タ を 受け 取 
る 準備 を し , 用 意 が で きた ら 受 信 状 態 に し て お きま す . 

2 の. こま コマ ン ギヤ で 役 送 まる ファ イル で つ 9M 時 を RSH239C か 送り 出し まず `` 還 P コマ 
ンド の デバ イス 名 は ほ 。 コ ンピュータ に よっ て 暴 を り ま す .、 ここ で の 実 半 は , PC-8801 で NE の 
CPM を 使っ た 場合 の も の で す . その 様子 を 次 に 示し ます . 


うり ら 


CPM の アプ リケーション いろ いろ “ 


Figure-6 .4.2 CPZM マシ ン か ら で き 上 っ た プロ グラ ム を PROM 書 込 器 に 転送 する . 


3. デー タ の 転送 が 終了 し て , 受信 が 成功 し た こと が 確認 され る と , PROM 書 込 器 は , 何ら か の 合 
図 を 出す で し ょ うか ら , PROM へ の 書き 込み 作業 を 行い ます . 


6 .4.3 未知 の PRO 内 デー タ を 読み 出し て ,CP/M て 解析 する 例 


CP/M マシ ン と , PROM 書 込 器 は 前 項 の 通り に 接続 ・ 設 定 し て ある と し ます . 未知 の PROM に 
は ,。 前 項 で 書き 込ん だ ば か り の チッ プ を サン プル と し まし ょ う . 

PROM 内 の デー タ を CP/M マシ ン で 受信 し て , HEX ファ イル と し て ディ スク に セー ブ す る 手順 
を 示し ます . 


1. まず , CP ン M マシ ン 側 で 。 先 に PIP コマ ンド を 実行 し て お きま す . ファ イル 名 は “ROM 1 . 
絆 生生 と で も も て お まま し た 


A>PIP ROM1 . HEX=RDR : IE] 


PIP コ マン ド の デバ イス 名 は 、 コ ンピュータ に よっ て 異な り ま す が , ここ で の 実例 は , PC-8801 
で の NEC の CPM の も の で す . 

2. この 後に 。 PROM 書 込 器 を 操作 し て , 未知 の PROM 内 の デー タ を 読み 出し て , RS-232C か 
ら 持氏 コー ド と し て 送り 測 し ます : 
その 時 の CPM 側 で の 受信 例 と , 生成 され た HEX ファ イル の 確認 の 様子 を 次 に 示し ます . 
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じ ピ ビン M マ シン と PROM 書 込 器 と の 接続 


ーー ーーー ーーーーー こ ーー ーーーーーーーー ーーーーー 一 ーー ee ーーー ーーーーーーー 


5 
4 *RDR : デパ イス か ら 受信 し て , フラ イル `*ROM1 .HEX“ を 作る . [E/ ラメ ー タ ヽ 

A>PIP RON1.HEX=RDRsEE] / を 付け て お ぐ と , 受信 状態 が よく 分 か る . さら に [H パラ メー タ を 付け て 「HE 

と する 方 が バタ ー で ある . HEX フ ァイル の エラ ー の チェ ッ ク を 行っ て こく れる. 

5 1OOOOOOO さ 1 3BBOCDBAOOAF さ 2018O さ 202 ヨ 8O さ 20OBOBS5 | 
1OOO1QO0210000220 さ B021 さ BBO22058O2207BOD さ 1B 
3 1OOO02OOO51D さ B1 1 1 さ 7O4CD 1004DBB2E6O 1CA290O67 
s 1OOO さ OOOCDBOOO さ 1 さ BBODBB2OFDCBOOOOFDCDFQQC5 
| 100O4O000 さ AO1BOB7CA さ さ OO2AO7BO7E さ 20ABO2 さ 7EB5 
| 1OOO5OQO さ 209BQ2 さ 1 1 OBBOO6O87E 1 22 さ 1 さ OSC259 さ 2 | 
3 1OOO6OOOQOO2207BQOCDD さ O 1 さ AO 1BO さ D さ 20 1BOC2 さ さ A6 | 
3 10O007OO000 さ 202 ヨ 021 さ BBO2205BO2207BOC さ ささ OQAA 
* 1OOOBOOOF SSEO1D く B1AFD3B12A0SBOEB2AO5BO72CC | 
| 10O09O002 さ 7 さ 3O6063EFF2 さ 7705C296OO2 さ 702 さ さ A9A 中 炎 ス フリー ン に GS 還 の され る 。 0 


1 
1 


s 1OO7DQOOFFOOFF 1OFFOOFFOQOQOQFFOOFFOOFFOOFF 1 1 
s 1007EOOOFFOOFFOOFFOOFFOOOOFFOOFFOOFFOOFF 1 1 
3 1007FOOOFFOO6FOOBFOOFFOOB4FFOOFFSOFFOOFFFD 
3 OOOBOOO1F フ 7 「 | 


た デー タ の 終わ り を 受信 する と , 自動 的 に ファ イル \ROM1 .HEX” が 作ら れる . 


Figure-6.4.3 PROM 書 込 器 か ら の 未知 の ROM デー タ の 受信 . 


生成 され た ファ イル の 確認 . ヽ 


/ A>STQAT RUN1。HEX / 
RE に じ は BYTES EXT ACC 
46 6 に 1 R/M AiROM1。HEX 6K バ イト の HEX フ ァイル が 作ら れ て いる . 
BYTES REMAINING ON gi 14K 


人 > 


Figure-6.4.4 生成 され た HEX ファ イル の 確認 . 


3. 生成 され た 未知 の ROM 内 デー タ の ファ イル “ROM1 . HEX′ を DDT や ZSID な ど に より 
解析 し ます . DDT に より メモ リ 上 に ロー ド し た 様子 を 次 に 示し ます . 
この ROM 内 デー タ は , Figure-6.4.4 の HEX デー タ の アド レス 部 か ら 。 ロー ド ・ ア ドレ ス は 
0 で ある こと が 分 か る の で , DDT な ど で メ モリ 上 に ロー ド す る 場合 は 。100H 以 上 に ロー ド 
する た め の バ イア ス を か け な け れ ば な ら な いこ と に 注意 し ます . 


うり フ 


に と M の レプ ケー ショ ン い いろいろ 


ーー っ Fe 年 に 1 
ADDT 』 DDT を 起動 . 


DDT VERS 2.2 
ー1R ロ M1 .HEX ) , 100H の バイ アス を つけ て \ROM1 .HEX" を ロー ド 、. 


-R1QQ 』 | (100H の パイ アス を つけ だ の は , この プロ グラ ム が 0H 
NEXT PC スタ ー ト の だ め ) 
Q9OQ QBOQOQ 
ー-L1QQ 』 ーー 
Q1QO し LXI  SP。BQSB 
Q1Q さ CALL OOBA | 
Q1Q6 XRA A | 


O107 STA BOO1 未知 の ROM 内 プロ プラム が , CP M の メモ ! リ 
O1QOA STaA Bo02 上 に ロー に され だ . 以後 は 逆 ア セン ブル な ご ど で 
O1QD STaQ BoOQO 解析 を 行 つ て 行 ご . 

O11QO  LX1I H。QOQOQQ 

O11 さ SHLD BOO ミ 

O116  LXI  H。B0 さ B 

Q119 GSHLD QOS 

O11C SHLD BOQ フ 7 


6 さ ポ ン 


Figure-6 .4.5 未知 の ROM 内 デー タ を , CPM 上 で 解析 する . 


6.5 CPZM マ シン 問 の 音響 カプ ラ に よる 通信 


最近 。 数 社 か ら 5 万 円 を 切る 低 価格 の 音響 カプ ラ が 発売 され て お り , 電話 が つなが る 所 な ら 日 本 国 
内 と 言わ ず 世 界 中 どこ と で も CP/M マシ ン 間 の デー タ の 送受 が 行え ます . 

音響 カプ ラ の ほとん どの も の は , RS-232C イン ター フェ イス で 入出 力 を 行っ て いる の で ,CP/M マ 
シン は 。 RS-232C イン ター フェ イス が サポ ー ト され て いる も の で ある こと が 前 提 と な り ま す . 

音響 カプ ラ に よる 電話 線 を 介し て の デー タ の 伝送 は 、 各種 ノイ ズ が 混入 する 機会 が 非常 に 多く , 長 
い デ ー タ 伝送 に な れ ば な る ほど , エラ ー 率 は 増加 し ます . よっ て , 電話 線 を 介し て の 伝送 は , エフ ー 
は 必ず 発生 する こと を 考慮 し て 作ら れ た プロ トコ ル を 持っ た 「 デ ー タ 通信 用 プロ グラ ム 」 に よっ 5 和 y 
ー タ 伝送 を 行う こと が 不可 欠 で す . 

その プロ トコ ル の 基本 は 。 例えば, 送り 出し 側 で 128 バ イト とか, 256 バ イト と か を 1 ブロ ッ ク と し , 
ブロ ッ ク 単 位 で チェ ッ ク サ ム や CRC(Cyclic Redundancy Check : チェ ッ ク サ ム よ り 高度 な エラ ー・ 
チェ ッ ク 方 式 ) な ど を 算出 し , その ブロ ッ ク の 最後 に 付加 し て 送り 出し ます . 受信 側 で は , 受 杜 し た 
デー タ を プ ブロッ ク 単 位 で チェ ッ ク し , OK で あれ ば OK サイ ン を 送信 側 に 返し , 次 の ブロッ ク の 送信 を 
要求 ます . も し エラ ー が 検出 され れ ば 再び 同じ ブロ ッ ク の 再送 信 を 要求 し ます . 

と .。 この よう な 手順 で 送受 両者 が ハン ド シ ェ イク し な が ら デ ー タ の 送受 を 行う 訳 で す . 


うり ご 


じ ピ ビン M マ シン 間 の 音響 カプ ラ に よる 通信 


6.5.1 専用 プロ グラ ム を 使用 せ ず ,PIP コ マン ド で 伝送 する 例 


通信 プロ トコ ル を 持っ た 専用 プロ グラ ム を 使用 し な けれ ば , 電話 線 を 介 し て の 伝送 は 実用 に は な り 
ませ ん . し か し , CPM の PIP コマ ンド に は , HEX ファ イル の 送受 の 際 の 異状 を 検出 する [H] パ 
ファ メータ が ぁ り ( 実 音 CPM 4 . 2 章 参 照 ), 短い イン テル HEX 形式 の デー タ な ら , 伝送 可能 で す . 
た だ し , PIP は エラ ー を 検出 する と 自動 的 に 入力 を 停止 し ます の で 。 その 場合 は 最初 か ら や り 直 き な 
けれ ば な り ま せん . 

で は , CPZM の マス ター・ デ ィ ス ク に 含ま れ て いる “DUMP . ASM′ を , ASM で アセ ンプ ブル し 
て 生成 され る “DUMP . HEX” を 音響 カプ ラ を 使っ て , 電話 線 で 伝送 する 例 を 示し ます . 


1. 6.4 草 の 場合 と 同様 に . CPM マシ ン と 音響 カプ ラ の RS-232C イン ター フェ イス を 接続 し . 


ボー レー ト を 300 ボ ー に 設定 し ます . 音響 カプ ラ の 通信 モー ド は , 送受 と も 半 二 重 (HALF) に 
セッ ト し ます . CALL…ANS の 切替 は , 送信 側が ANS?, 受信 側が “CALL′ に セッ KR ま 
「 

2. 相手 と 電話 で 打ち 合わ せ を し , その 後 , 受話 器 を 音響 カプ ラ に セッ ト し , カプ ラ の 電源 を 入れ 
ます . 


3. ます 受信 側 か ら 先 に 次 の PIP コマ ンド を 実行 し ます . 作ら れる ファ イル 名 は , ここ で は TEST . 
HEX と で も し て お きま す . 


A>PIP_L TEST . HEX=RDR : [HE] J 
4. 手順 3. の あと に , 送信 側 は 次 の PIP コマ ンド を 実行 し ます . 
A>PIP_LJPUN : ニ DUMP. HEX[IE], EOF : / 


5. ノイ ズ な ど に よる エラ ー が な けれ ば , これ で 自動 的 に 受信 し た デー タ の ファ イル が 作ら れ ま す . 
エラ フー が 発生 すれ ば , 受信 側 で は エラ ー・ メ ッ セ ー ジ を 出力 し て , 受信 を 停止 する の で , 再び 
手順 の 2. か ら や り 直 し ます . 


に 受信 側 の 実行 の 様子 を 示し ます . 送信 側 は , PIP の コマ ンド ・ フ イン が 異な る だ け で 同様 な の 
で 省略 し ます . 
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6E/ZM の アプ リー ショ ン い ろ る いろ 


A>PIP TEST.HEX=RDRsLHE]) NRDR : バア テバ パイ スガ から 入力 し て , その デー タ を フラ ァイル) し トッ て で セー ン ひ も る . 
RA HEX フ ライ ル を チェック を させ る だ め の [H] パ ラメ ー タ を 生 ず 付け る こと 
ュ 10010000210000 ミ 9221502 さ 15702CDC101FEFFC2B4 
s 1OO1 1OQO1BO1 1 1F さ O1CD9CO 1C さ 5101 さ EBQ さ 2 1 さ O2 さ 人 
s 10012000210000ESCDA2O1E1DAS101477DE6OFC2D1 
s 1OO13OQOO440Q1CD7201CDS9O1QFDA51017CCDBFO1FF 
s 1OO14OOO7DCDBFO 1 2 ささ E20CD65O17 ヨ CDBFO 1 C さ 2 さ 66 
s 1OQ15OOQO1CD7201201502F9C9ESD5SCSOEOBCDOSF 1 
s 1OO16OOOOOC1D1E1C9ESD5SCSOEO25FCDOSOOC1D1Q1 
“ ・ [E] パ ラメ ー マ に より の , 入力 データ は , 順次 
。 スク リー ン に も 表示 され る . 


s 1OO1EQOQO452044554D5Q0205645525 さ 494F4E20 さ 1 DD 
s 1001FOOO2E さ 4240DOn4E4F 20494E5O555420464966 ミ 
s 1002OOQO4C45205052455 さ 454E54204F4E204449B2 
_sO0302 10005 さ 4B2429 
s OQOQOQQOQQOQOO | 


- エラー な ぐ 受 信 で きだ 場合 に は , 以上 の HEX デ ー タ が , ファ イル `TEST.HEX? と し て セー プ さ れ て いる . 


Figure-6.5.1 音 術 カ プラ に よる 電話 線 を 使っ て の デー タ 受 信 側 . 


注 ) PIP コマ ンド の デバ イス は ,。 コン ピュ ー タ に よっ て 異な り ま す . ここ で の 例 は , 送受 と も PC 
-8801 の RS-232C イン ター フェ イス を ,。 NEC の CP プ M で 使用 し た も の で す . 


以上 の よう な 手順 で , 専用 の 通信 プロ グラ ム が な く 〈 く て も , HEX ファ イル で あれ ば , 2 一 3 回 や り 直 
し を すれ ば 伝送 可能 で す . 通常 は , 通信 プロ グラ ム を 使っ て いま す の で , 今回 の 方 法 は 初め て の こと 
で あり , アス キー の 出版 部 と , 筆者 宅 の 間 で 実験 を 行い まし た . 回 線 の 状態 に 大 きく 依存 し ます が , 
だ いた い 2 回 に 1 回 は 成功 する よう で す . 


人 本 ら ァ ク ス . 右端 は , YD-74CX2 ド 
ライ ブ を 接続 し た 往年 の S-100 シ ステ ム SOL-20. (本書 が 出版 され る 頃 , 左端 mm の 8 イン チ シ ス テム て で 満足 の いく 高 
速 CP /M( 未 発売 ) が 稼動 を 始め , 随分 と 活躍 し た SOL も 交代 の 時 代 が 来 た . ) 
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あこ の が き 


アス キー・ ラ ー ニ ング シス テム の CPM シリ ー ズ は ,。 この 「 応 用 CP プ M」 で 一 応 完結 で す ,「 入 
門 CPZM」 に 着手 し て か ら , この 応用 編 が 発売 され る まで , 1 年 半 も か か っ て し まい まし た . し か し , 
な ん と か まとめ 上 げ る こと が で きた の は , 「 早 く 応 用 CPM を 出せ 」 と いう 実に 多く の 当 シ リー ズ 愛 
読者 の 多大 な 期待 に 支え られ て いた た めで す . どう も あり が と う ご ざ いま し た . 

CPM の 良さ は , その 簡潔 さ に あり ます . その 簡潔 で ある た め に 持ち 合せ て いな い 機 能 を 捕らえ て , 
欠点 で ある と 言う 人 も 中 に は いま す . 私 は それ ら の 人 は , も し か し た ら 8 ビッ ト の マイ クロ コン ピュ 
ー タ に 取り 組ん だ こと が な い の で は な いか と も 思い ます . 相手 は ミニ コン ピュ ー タ や 大 型 コ ン ピ ュ ー 
タ で は あり ませ ん . 

要 は コン ピュ ー タ の 能力 と の バラ ンス の と れ た OS で ある こと が 大 切 で す . 16 ビ ッ ト の, それ も 68000 
あたり の コン ピュ ー タ で あれ ば , 現在 の CPM で は 明らか に バラ ンス し ませ ん . そこ で は 新しい CP ン 
M で ある コン カレ ント CP〆M と か , UNIX と か の 世界 に な る で し ょ う . 

私 は , 当 シ リー ズ の 最後 に 「 応 用 CPM」 を 読ま れ た 読者 の みな さん に 1 つ お 願い が あり ます . 

それ は , CPM の 存在 を 知ら な か っ た り , 名 前 は 知っ て いて も 取り か か る 糸口 が 見 つか ら な いで い 
る 多く の 優秀 な 若者 に , この CPM の 世界 が ある こと を 教え て あげ て ほし い の で す . 彼ら の 多く は , 
ッ パ ー ソ ナル ・ コ ンピュータ に 組み 込ま れ て いる BASIC 言語 の 殻 の 中 だ け で コン ピュ ー タ と いう も の 
を 見 て いる と 思う の で す . し か し 何 か の きっ か け で ,。 アセ ンプ ブラ な り 他 の 言語 な り に 興味 を 持つ よう 
に な り , 大 きく 飛躍 する こと が で きる か も 知れ ませ ん . BASIC か ら 離 れ よ うと し た 時 . そこ か ら が す 
べ て の 始ま り で ある と いう 気 が し て な ら な い の で す . 

読者 の 回 り に , その よう な 熱心 な 若者 が いた ら , 基 非 CPM の 世界 の こと を 話し て あげ て 下さ い . 


ソフ トウ ェ ア の 世界 は 限り な 〈 広 く , CPM は この 海 に 乗り 出す た め の 小 き な 船 に 過ぎ ませ ん . し 


か し , 小さ いな が ら 信 頼 で きる 船 で す . 
今夜 は 、 シン プル で 小さ な 船 「CP プ M」 に 乾杯 ! 


5 章 の 「 各 種 高 級 言語 」 で は , ABC の 河田 至 弘 氏 。 電通 大 の 打 


越 浩幸 氏 .。 リ ギ ー コ ー ポ レーション の 片桐 明 氏 に いろ いろ と 助け 村瀬 康治 
て 頂き まし た . 無理 な お 願い を 心 良 く 引 き 受 け て 下さ っ て , ほん テレ ビ 朝 日 技術 局 勤務 


と うに あり が と う ご ざ いま し た ., 初版 時 36 歳 
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ゲ 休 4 MC の C ア 7 に つい で て 


1982 年 7 月 に , PC-8001 ま た は PC-8801 に 共通 の CPM が NEC か ら 発 売 さ れ ま し た . ディ スク 
の アク セス ・ ス ピー ド は , 8 イン チ の 標準 ディ スク の 場合 より 速く 非常 に 高速 で あり , 日 本 の CPM 
で は 初め て の タイ プ ・ ア ヘッ ド 機 能 ′ な ど , 多く の 拡張 機能 を 持っ た 画 期 的 な も の で す . ここ で は 
NEC の CPM で 一 番 最初 に 発売 され た , ミニ ディ スク 用 片面 バー ジョ ン の も の の 概要 を 紹介 し て 
お きま す . 


借 対 象 機種 
PC-8001 十 (PC-8011 ま た は PC-8012・8013) お よび , 
PC-8801 (N-BASIC モー ド で 動作 ). 


代 使 用 デ ギィ スク ・ ユ ニッ ト : 
PC-803]-1W ある い は PC-8031-2W (た だ し 1W と し て 動作 する ) の いずれ で も 可 . 


今 NEC-CP プ M 独自 の 拡張 機能 : 

1) エ スケ ー プ ・ シ ー ケ ンス 等 に よる スク リー ン ・ コ ント ロー ル ( 6. 3 章 参照 )., お よび N-BASIC 
内 グラ フィ ッ ク 機 能 な どの コン トロ ー ル . ! 

2) N-BASIC ROM 内 各 ル ー チ ン の 呼び 出し 機能 , 

3) 割り 込み 処理 に よる バッ ファ リン グ ・ キ ー 入 力 機能 (これ を タイプ ・ ア ヘッ ド 機 能 ” と 言 
い 。 コン ピュ ー タ が いか な る 処理 を 行っ て いる 場合 で も . また , いか に 速く タイ ブイ ン し よ 
うと 。 キー が 押さ れ た も の は 1 文字 た り と も 取り こぼす こと な く 〈 く 入力 が 行え る 機能 ). 

4) 任意 の プロ グラ ム を , CP ン M の 起動 時 に オー ト ・ ス ター ト さ せる こと が で きる 。. 

5) 割り 込み 処理 に よる RS-232C ポー ト を 2 チャ ン ネ ル , 通常 処理 に よる も の を 1 チャ ン ネ ル , 
計 3 チャ ン ネ ル の RS-232C ポー ト を サポ ー ト . 

6) フ ァ ン クシ ョ ン ・ キ ー に より スク リー ン ・ コ ピー 等 の 機能 を サポ ー ト し , ユー ザー に よる 定 
義 も 可能 . 

(その 他 省 略 ) 


て ま ー 


NEC の C ピ ビン M に つい て 


答 マ スタ ー・ デ ィ ス ク に 含ま れ て いる 独自 の ユー ティ リティ ・ ブ ログ ラム ・ 
1 - ケ ィ グ が て テテ ォ ー。 の wc 
2) ディ ズ 失 css。 
3 オー トー ステ アート も 全 人 ワ ム 。 
4) フィ ァ ア グン タラ ョ ン ・ て ーー 還 チゲ テッ が 
5) CPM サイ ズ の 変更 を , 完全 に 自動 的 に 行う) プログ ラム 、. 
(その 他 省 略 ) 


NEC は , この ミニ ディ スク の 1 W 用 の あと , 2W 用 の CPZM, それ に PC-8801 N88 モー ド で 動 
作 す る 8 イン チ ・ デ ィ ス ク 用 CPM を 順次 発売 し て いく 了 予定 で いる よう で す . 期日 は 未定 . 


/A>STAT %.※/ 


人 Recs Bytes Ext Acc 
Enter DATE ( 提 /DD/YV) : TVPE [RETURN] 10 SKP 64 1s1 1 R/U AiASM.COM 


56K:CPN Version 2.2 (for NEC PC-991) 
Copuright (C) bu Digital Research / NiPpon Electric Co.,Ltd, 


8 1k 1 R/U AsAUTHELLO0,COM 
6 1 1 R/U AkAUTO-ST .CUN 
18 3k 1 R/U AiCOPY .CON 
38 5k 1 R/U AiDDT .COM 
42 ィ k 1 R/U Az:DISKDEF 、LIB 
うう 5k 1 R/U AiDUMP . ASN 
3 1k 1 R/M AzDUMP ,CON 
つ コン 7k 1 R/U AiED.CON 
19 2k 1 R/U AFORMAT .COM 
143 18k 2 _R/U AkHELLO,ASM 
PC-800| CP プ M の オー プ ニ ン グ 画 面 32 4k 1 R/U AiHELLOS56.COM 
29 4k 1 R/U AzKEY.CUM 
14 2k 1 R/MU AiLOAD .CONM 
32 4k 1 R/U AiMODULE ,HEX 
89 19k 1 R/MU AiMOVCPM .CON 
58 8k 1 R/M AiPIP,.CONM 
41 6k 1 R/M AiSTAT,.CONM 
19 2k 1 R/M AiSUBMIT .COM 
4 1 に 1 R/M AkSMUITCH.CON 
し 。 1k 1 R/U AiSYSGEN . CONM 
66 9k 1 R/U AiUSER ,ASN 
19】 12k 1 R/U AiUSERIO.ASNM 
と ア 。 4k 1 R/U AkMCLOCK .CONM 
。 ~ 1 に 1 R/U Az:XSUB ,CONM 
Bytes Remaining On Ai 3k 


> 


Figure-A.1 PC-8001 CP/M に 含ま れ て いる ファ イル . 


録 CP77 た で る 万 4S7C 記 語 の 
ステ ー ル メン ム ん ・ 内 数 光 帝 一覧 表 


CPM 上 の 高級 言語 で 最も ポピュラー に 使わ れ て いる BASIC 言語 の 代表 的 な も の を 4 種類 ( そ 
の う ち 2 種 は コン パイ ラ ) を 取り 上 げ , その ステ ー ト メン ト と 関数 の 一 覧 表 を 示し ます . 
取り 上 げ る 言語 を 次 に 示し ます . 


@MBASC (イン ター プ ブリタ) 

旬 BASCOM (コン パイ ラ . 3. 4 章 参 照 ) 
@CBASIC (中 間 コ ー ド ・ イ ンタ ー プ リタ ) 
WCB-80 (コン パイ ラフ . 5.3 草 参照 ) 


1 . ステ ー ト メン ト お よび 関数 一 覧 表 


キーボード ら 入力 し て 変数 に 代入 | INPUT | NNPUT | NNPUT | NNPOT 
| INPUT LINE | NPUT LNE | LINE NPUT | UNE NPUT | 
画 司 に 情報 を 遇 力 | PRNT | PRNT | PRNr | PRNT 
画面 に 拓 定 書式 で 天 字 数 値 を 表示 | PRNT USING | PRINT USING PRINT USING | PRINT USING | 


| プリ ンタ に 情報 を 出力 | PRiNT | PRNT | LPRNT | LPRNT 

] プリ ンタ に 指定 書式 で 文字 , 数 値 を 印字 || PRINT USING | PRINT USING | PRINT USING 
指定 し た 出力 ポー ト に デー タ を 貼 力 | ouT | OOT | our | our 
メモ リ の 指定 番地 に デー タ を 書き 込む | POKE | POKE | PokE | POkE 

店 | 由 才 隊 衝 コン ソー ル か ら ブ リン 多 に 変更 」 EERINTER | LPRNTER HI__ 5 | . || 
イ | 出力 凌 置 を プリ ンタ か ら コ ン ソ ー ル に 変更 2 
ル | DATA で 定義 され た 数 を 変数 に 代入 | READ | READ | READ | READ 
以 READ 廊 て 読み 込ま れる デー タ の 格 稚 | DATA | DAA | DAA | DamA 
ー | DATA 女 の 値 の 再読 み 込み 指定 | RESTORE | RESTORE || RESTORE 


シー ケン シャ ル ・ フ ァイル か ら の デー タ 入 力 | READ# READ# | INPUT# INPUT 
ラン ダム ・ フ ァイル か ら の デー タス 入力 | READ READ# | GET# GET # 


汁 圧 ヶ 
に と 


(で ヽ vJ) 


ーー。 


シー ケン シャ ル ・ フ ァイル か ら の | 行 入 力 READ 半 LINE|READ 半 LIN 


ラン ダム ・ フ ァイル か ら の | 行 入 力 READ LINE 


x テ ー1 寺 圧 


う 1 2 


CPM 上 で 走る BASIC 言 語 の 
スズ テー トメント: 関数 比較 一 覧 表 


ーー 王 ニー ニニ ニニ ニー ニー ニニ 9[ー バ ニ ニニ ーーー ニー ニー ニー ニー ニー ニーーー ニ ーー ニュー ニーーーーーーーーーーーーーーーーーーーーーー] 


和 | ディ スク か ら 1 バ イト の デー タ を 入力 | | eET | | 
シー ケン シャ ル ・ フ ァイル に デー タ を 出力 | PRINT# | PRINT# | PRINT# | PRNT#K 

ラン ダム ・ フ ァイル に デー タ を 出力 | PRINT# | PRINT# | PUT# | PUT# 

シー タン シ ャ ルフ ァイル えて デー を 時 カ PRINT# USING|PRNT# USNG IPRNT USNG 
| 1 

| 2 


ロ 
和 
コ 
垢 


Vw テ ー ゴ ボ ハ 寺 圧 


| ラン ダム ・ フ ァイル に 指定 書式 で デー タ を 出力 PRINT# USING |PRINT # USING| 

| ディ スク に | バイ ト の デー タ を 出力 | | PUT 

指定 され た 行 番号 の 文 へ 無 条 件 分 岐 | GOTO | GOTO | ecoTo 

分 | 指定 され た ラベ ル の 文 へ 無 条 件 分 岐 | " | GoOTO | 

陸 | 指定 され た 行 番号 か ら の サブ ルー チン へ 分 岐 | GOSUB | GOSUB | ecosug 

テ | 指定 され た ラベ ル の サブ ルーチン へ 分 岐 。 | | GOSUB | 
| 


ト 条件 判断 に よる プロ グラ ム の 流れ の 制御 | 上 F-THEN-ELSE |IF -THEN-ELSE IF-THEN-ELSE IF -THEN-ELSE 


ト NO= デ 


式 の 値 に より 指定 行 番号 の 文 へ 多岐 分 岐 | ON-GOTO | ON-GOTO | ON-GOTO 
式 の 値 に より 指定 ラベ ル の 文 へ 多岐 分 岐 | ” | ON-GOTO | 


テ V vw 


ーーー 一 ーーーー 王 ーーーーー ニ ニニ ー ニ ーー ニー ニ ニニ ニニ ニー ニー ニー ニー ニー ニー ニー ニー ニニ エエ ビエ ー ニ ーー ニー ニー ニーーーー9 ら 一 一 一 一 ーーーーーーーーーーーーーー…ーーーーーーーーーーーーーーー 


レ | 一連 の 命令 を 指定 回 数 繰り 返し 実行 | FOR-NEXT | FOR-NEXT | FOR-NEXT | FOR-NEXT 
1 |FOR 一 NEXT 文 の 増分 を 指定 | STEP STEP | STEP STEP 
プ | 一 連 の 命令 を 条件 つき で 繰り 返し 実生 | WHILE -WEND | WHILE-WEND | WHILE-WEND | WHILE-WEND 


一 ビーニー ニー 王 ーー ニニ ニニ ニニ ニニ ニニ ニー ニー ニー ニー ニー ニー ニニ ニニ ニニ 9 ニニ ロー ニー ニー ニニ ニー ニニ ニー ニニ 一 ニニ ーーーーーーー ニ ーーーー 一 ーーーーーーーーーーーーーーーー 一 一 


プ 
アア 
イ 
ノレ 
管 
理 
ズ 
デ 
1I 
ト 
ズ 
ン 
ト 


ーー 一 ニー ニーーーーーーーーーー ニ ニー ニニ ニニ ー ニ ニー ニー ニー エニ ニニ ニー ニニ ニニ ニニ ーー ニー ニー ニー ニー ニー ニー ニー ニー ニ j テ ーーーーー テ ーー テ ゼー 靖 一 ーー 一 ーー 一 ーーー 一 ーーーーーーーーーーーーーーーーーーーーー 一 一 


し _ DIM | DPM | DPM 

[配列 の 最小 添字 の 指定 ” ~”" | "” | OPTIONBASE|OPTICNBASE| 
機械 語 プ ログ ラム の た め の メ モリ 確保 | SAVEMEM | SAVEMEM | CLEAR | CLEAR 

定 | ユー ザー 関数 の 定義 ( | 行 ) | DEFFN | DEF | DEFFN | DEFFN 
ス | ユー ザー 関 束 の 定義 (複数 行 ) | DEFFN-FEND| DEF-FEND| | 


テ | 敵 SUB 考 続 開 ” | |pep=rewol | 
| | 変 下 の 型 を 整数 と し て 宮 言 | INTEGER | INTEGER | DEFNT | DEFINT 
メ | 放 の 型 を 半 策 度 実数 と し て 富 言 | | | beFsNe | peFsNG 
| 秋 数 の 型 を 全 精 実数 と し て 宮 言 | REAL | REAL | DEFpBL | DEFDBL 
変数 の 型 を 交 字 と し て 前 言 、 | STRING | STRNG | DFsrR | DEFsrR 
系列 の 変更 | RANpoMiZE | RANDoMZE | RANpoMzE 
コン ソー ル ! 行 あたり の 表示 邊 の 指定 | PoKE2720| | wprH | wpmm 
プリ ンタ | 行 あ た り の 印字 委 の 指 寄 | wiprH | |wpmmLPRNrlwprmupmNr 


エーーー ヤー ヤーーーーー ニ ーー テニ ーーー ニ ーーーーーー ニ ーーー ニ ーー テー ニーーーー ニ ーー テー テーー テ ーー9 ゞ ーーー ニ ーーー ニ ーー レニ ーーーーーーーーーーーーーーーーーーーーーーーー 


| ON ERROR GOTO 
| EoF 
2| プロ グラ ム 実 行状 態 の 追跡 ” 。 . | TRACE | | rpoN 
只 ト | プロ グラ ム 実 行状 態 の 追跡 の 解除 。 | " | | TpoEF 


CPM 上 で 走る BASIC 言 語 の 
ステ ー ト メン ト ・ 関 数 比較 一 覧 表 


ニー ニー: む じ ド ub ドド ド ドド バード ーー ニニ ニニ ニニ ニニ ニニ 一 一 一 一 本 本 本 一 一 本 本 本 ニレ レニ ニ ※ー ロ むら ゎ ら り 六 ョ ぢ ぢ ョ ぢ ぢ ニニ ニニ ヌ ぢ ッッ ゞ 9 ゞ 9 ゞ ぅ 99j ト +G( 上 ーーー ニ ーー ニ ム ニ ニー ニー ニニ ニニ ッッ ゞ に L ニ ニニ ニニ ニレ ニニ むむ ゅ ぅ ろ 還 ニニ ニー ニー ニー ニー ニー ニー ニー ニー ニー ニー ニー ニー ニーーーー テ ゼー テー9ーーー ニ ーー 一 一 ーーー ニ ーーーー 


| ア ネ キ ー コ ー ド を 交 に 更 天 ” 上 pHes | 09RS | GBR | ofs 

時 。 og、ー ト BE トー 要 。 

え | 列 の を か 夏 の 文 の 取り 則 し | LEFTS | LEFrs | LErrs | ter 

えら れ た 交 析 返し 区 和 の ft 成 | 。。。 | | srmes | srnes | 

ン | 急 の スペ ー ス か ら な る 放 の 作 臣 | 。。。 | | spacEs | saoEs 

中 の 小区 字 を 天災 字 に 変 多 | UGASES | UGASES | | 

1O 進 数 を 16 進 の 好 列 に 科 換 。 | | | lexs | pexs 

開放 saES トー ーー トーー ト 結語 

| の の 丸 を アス キー コー ドド 役 提 | ASO | ASC | AsC | As '・ 

。! | 光史 を 近 し 、 その 位置 を える | MATCH | MATCH | NNerR | NeTR | 

| 太字 列 の 長き を える | LEN | teEN | rew | umw 

加 全 PE 上 ト wL | we 1 _wk | wk 

定 ポ ー ト か ら 1 バ イト 有 み 込む |  NP | Np | em | Ne 

アモ り の 秋夫 容 を える | PEEK | PEEK | PEEX | PeEK 

| コン ソール ・ ス テー タス を 与え る | GONSTAT 多 | GONSYAT タ | | 

コン ツー ルプ バイ ス か 5 | 区 読み A む | GONHAR | GONOHAR タ | 1) | 1. 

和信 | CPM コマ ンド 行 の 区 字 列 を を える | GOMANDS | GOMANoS | | 

| に 制 り 付 けら れ た メモ リ 番地 を ちえ る | VARPTR | VARPTR | VARPTR | WARPTR 

間 | に 割り 付け られ た メモ リ 番 地 を 『 え る | SAD | sApp | | | 
定 フ ァイル の プ ブロッ ク 数 を える | szE | se | 、 | | 

他 | エラ ー- コ ー ド を 号 え る 。 | | ERR | gmm | gmm 」 

| エラ ー の 先生 し た 行 秋 号 を 5 える | | gn | gmt | gmt 

シッ ー ル から 82X9= ュ ーッ ク L& い | | INcEY | PurS | Neums 

| コ シッ ー ル ドカ きれ. の 時 946 | POS | PO5 | PoS | pos 

| カンタ 9 きれ.% の 8 軒 を 946  | POS | POS | LtPos | ros 


近 値 )  、 、  、 | aese6o | 
Eto 世 CFPYrinry Im 
数 | 章 余 X.(XmJxm 。 。 。 | Mopem |  xMoD mt 源 旧 お) 
9 半生 
数 の 琶 数 化 。 | wi | CNTG9 
字 列 の 数 値 化 。 | war69 | 9 
下 負 符号 の 取り 笛 し” | seeo | sewes 
本 度数 の 人 精度 数 | | cpmteo 
全 策 度 実 逆 の 半生 実数 化 ” | | csweeo 
数 e"。  、 、 | EpGO  、 | sgpxe9 1 
人 | 邊 凶 数 cgK。 | troeeo | roeeo 
ma ーー トーーー 5909 ーー トー 一 9 ーー 
間 EEGLH で 信明 6oeG9 | esg 
|] 近 名 eX | raweo | swe 
送 正則 solaX | are | amwo | 
平 要 7X 。 、 ]| someo | someo | 
四半 1 ao 上 | mp 
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CPM 上 で 走る BASIC 言 語 の 
ステ ー ト メン ト ・ 関 数 比較 一 覧 表 


2 . 定数 , 変数 仕様 一 覧 表 


ーー 
ーー | +s | rss 
最小 | =sem ] =-sgxsws 
有 交 務 数 。 |  、 、 、 、  ] 頃 
| 大 役 | 上 | 、 名  - 
上 最 源 数 | 1 1 =-sw 
有 交 数 |  ! 納 。 |]  。 縮 
人柄 度 実 十 数 | 最大 指数 | 62 | ss 

| 最 拓 孝 |  -ew | ーss 
16 人 定数 | 数値 の 後に H | 此 仙 の 前 E&H 
信 法 表示 | 8 進 定数 | | 類 代 の 前 gs た G&O | 
| 人 雪 | 委 信 5 後 EB = | 
|| 33xm_ laxxaziamW き | ap | gs 
「 
。 | 人 精 間 弄 = | )0 10.1.0. 01 5 
。 | 太尾 | 人生 型 | 殺っ けり ない |  #* 、 、 
和 ビー 5 3 5 2 
| gmomg 叶 | ss 各 | cms 
| ラベ ル の 使用 。 | Go4 可 | 4 各  )、1. 
視 | | 行 の 最大 字数 | szssx 守 |  zsgx 地 | 


う 1 / 


じ ビ ピン M 上 で 走る BASIC 言 語 の 
スズ テー トメ ント 関数 比較 一 覧 表 


| きい な 等しい | 
| 王 5 っ )、 | 
| 


等 し い 


=| 


3 . 演算 子 一 覧 表 


CBASIC, CB 一 80 | 


= ュ グ ダ 。 。 | 
MOD(x, m) (関数 ) | 
ii il 


3FfFTD3 旨 | 
( 2 
「 ホ ーー ゴザ 


が 宮 C 相 書 で 記 し た 谷 導 シフ ムク ウェ ア に つい て 


本 書 で 使用 し た ソフ トウ ェ ア の 中 で , 


MACRO-80 (和文 マニ ュ ア ル 付 ) 
LINK-80 (和文 マニ ュ ア ル 付 ) 
BASCOM (和文 マニ ュ ア ル 付 ) 
FORTRAN-80 (和文 マニ ュ ア ル 付 ) 
muLISP 


以上 は , マイ クロ ソフ ト 社 の 極東 総代 理 店 で ある 帆 ア スキ ー コ ン シ ュ ー マ プ ログ クツ (TEL : 03-486 
-7111) か ら , その 最新 バー ジョ ン を 快く < 提供 し て 頂き まし た . 


0 ん 
MAC PLI-80 (和文 マニ ュ ア ル 付 ) 
RMAC APLN80 
ZSID ACT69 
CIS COBOL (和文 マニ ュ ア ル 付 ) XLT86 
CB-80 SuperCalc (和文 マニ ュ ア ル 付 ) 
PASCAL ン MT UTILITY VOL1 (和文 マニ ュ ア ル 付 ) 


以上 は , デ ジタル リサ ー チ 社 の 極東 総代 理 店 で ある . 則 マイ クロ ソフ トウ ェ ア ・ ア ソ シ ェ イツ (TEL : 
03-497-0381) 
か ら , その 最新 バー ジョ ン を 快く 提供 し て 頂き まし た . 
また , Rgy FORTH に つい て は 。, 
帆 リ ギー コー ポレ ーション (TEL : 045-313-3038) 
か ら , その 最新 バー ジ ョ ン の 提供 と ,。 プロ グラ ミン グ に つい て の 親切 な 助言 を 頂き まし た . 
これ ら の ソフ トウ ェ ア の 購入 や 。 問い 合わ せ に つい て は 。 上 記 . また は 上 記 の 販売 店 に 相談 し て 下 


さい . 参考 まで に , 和文 の マニ ュ ア ル が 付属 し て いる も の は “(和文 マニ ュ ア ル 付 // と し て お きま し た . 


31 選 


本 書 で 使用 し だ 首 種 ソフ トワ エア に つい て 


軸 入 ソフ トウ ェ ア の 和文 マニ ュ ア ル 付 の も の は , 上 記 ま た は 上 記 の 販売 店 に よる ルー ト で な けれ ば 
入手 で きま せん の で , よく 確認 し て 下さ い . 

アス キー ロジ ジュ ーー マブ ョ クル の 那須 生 炊 氏 

マイ クロ ソフ トウ ェ ア ・ ア ソシエ イツ の 社長 の 岡田 純一 氏 

リ ギ ーー コー ポレ ーション の 社長 の 片桐 明 氏 
に は 。 当 と F プ M シリ ー ズ の た め に 何かと て 電 力 叶 きま し て 、 机 導 あり が どう ご ざい は ま も か な. 


時 


生 衝 を 禁 ) まで [4 下 1 EET 


本 書 で 使用 し た ソフ トウ ェ ア な どの マニ ュ ア ル 


う ジ 0 


好 録 り CPZ rers7op ヵ 2 ク 。 ク の バグ / こ ご つい て 


デジ タル リサ ー チ ナチ 社 は , 1982 年 1 月 に , それ 以前 に リリ ー ス し た CPM vVersion 2 .2 の バグ 情報 の 
まとめ を 発表 し て いま す . 

一 般 的 な ユー ザー に は 直接 関係 な い バ グ も あり ます の で , ここ で は , 日 常 使う 可能 性 が ある も の で , 
一 応 は 訂正 し て お いた 方 が よい と 思わ れる も の を 2 件 ほど 紹介 し て お きま し ょ う . それ 以後 の リリ ー 
ス の も の は , 除 々 に 修正 きれ つつ ある と 思い ます が , 次 に 示す リス ト の 箇所 を , 一 応 DDT で 確認 し 
て みる な 呈し 1. う 2。 


FE の パ 全 アー タ 1LS| と [0] の バグ 

PIP の オプ ショ ン で ある 【[S] と [Q] パラ メー タ を 使っ て , [は 文字 列 1 へ ZQ 文 字 列 2 へ Z] の 複合 コマ 
ンド と し て , 文字 列 1 か ら 文 字 列 2 の 間 を 転送 する 場合 “文字 列 1” の 字数 と “文字 列 2” の 宇 数 が 同 
じ 長 さ の 場合 , 正常 な 動作 を し な い 場 合 が あり まし た . 

これ は 。 次 に 示す 手順 で パッ チ を 行う こと に より 修正 で きま す . 


A>DDT PIP。CDM/ DDT を 起動 し , PP. COM を ロー ド す る . 
DDT VERS 2.2 
NEXT FC 
1EOO O1OO 
ーL116B。117 マ / 
116 昌  LDQ 1F62 
116B GT 1DF7 
11 ゐ る E し LXI 日 、1F ム 2 
1471 PVI hM。OO 逆 ア セン ブル し て , バグ 個所 の 確認 、 
117 さ LDA 1DF9 この よう に な つて いる も の は , 以下 の よう に 修正 する . 
1176 INR ら aa 
1177 BTA 1DFB 
1 1 7 ム 
ー 人 Q1168 / 
116 昌 LXI 日 。 1F6 デ / 
116B MOV NM)』 
116 じ GTA 1DF フ / 
116F MV M。O』 
。 HBy_a fn) フィン アセ ンプ ブラ で , この よう に 修正 する . 
1175 FMVI 95) 
1177 INR ) 
117 は は DCX 日)/ 
1179 NMOV M。 人 / ネ 


117A  。/ 


-BOJ) DDT を 終わ り CPZM に 戻る . 


コン 1 


ご C ピ ロン M version2 .2 の バブ に つい て 


>5aVE_27 FIP。COHM/ 修正 し だ PIP. COM の メモ リ ・ イ メー ジ を ディ ス フ に セー ブ す る . 
> _ PIP. COM の パッ チ 完 了 . 


2 
Figure-D.1 PIP の [S-Q| パラ メー タ の バグ の 修正 . 


SUBMIT ファ イル の 中 の コン トロ ー ル ・ キ ャ ラク タ の バグ 

SUBMIT ファ イル (,. SUB) 中 に コン トロ ー ル ・ キ ャ ラク タ を 含め る 場合 は ,。 例え ば Ctrl-Z で 
あれ ば , 山形 印 の “AA” と の の 人 ~ 入 の と 書け ば , これ は SUBMIT に よっ て Ctrl 
- の と し て 認識 され る こと に な っ て いま す が , 正常 に 動作 しない 場合 が あり まし た . 

ぶ 札 は 。 - 決 】 お 


ーーーーーーーーーーーー ツ ーー ツーmーmmーーーーーーーーー…ーーーーーーーーー- 


A>DDT SUBMIT.COM) - DDT を 起動 し , SUBMIT.COM を ロー ド . 

_ DDT VERB 2。2 

NEXT FC 

Q6OO_QO1OQO 

ーL441』 

o441 SUr | 
| 


O44 さ STA 3 

Oo446 MOV C。A 

QO447 MV 4 19 

ke 逆 ウ ジア セン プル し て , バグ 個所 の 胡 認 . 
O44R _.JNC 0 ン 

O44D  LX1 B。O19D ご の よう に な つて いる も の は ., 以下 の よう に 修正 する . 
045O0 CALL O2a7 

QO45 さ JMF  O4SE 

O456 LDA  OE7D 

OO4599 INR ム A 

ー5S442』 

OMA2S 1 9 | | 

0443 32 。J) [| アド レス 442H の 1 バイ ト の み 変 更 する . 

ーGO 】 DDpT を 終り CPM に 戻る 


ArSAVE 5 SUEBMIT.COM ) 修正 し だ SUBMIT COM の メモ リ ・ イ メー ジ を ディ スク に セー プ す る . 
AA 。、 。 。 。 PCBMDCOMO( ッ チチ 


Figure-D.2 SUBMIT の コン トロ ー ル ・ キ ャ ラク タ の バグ 修正 . 
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